ABSTRACT 


This document describes the problems and solutions associated 
with generating and running RSTS/E VO6A-02 systems. The sys~ 
tem manager should read this entire document before generating 
the system and include the solutions as part of the procedure 
to generate RSTS/E. 


The format of this document conforms to that used in the Soft- 
ware Dispatch. The organization of the sections is such that, 
after usage, the pages can be filed in appropriate order ina 
notebook. A collection of existing problems and solutions for 
RSTS/E can therefore be kept in one location. 


For further information on RSTS/E documentation, refer to the 
RSTS/E Documentation Directory, Order No. DEC-11-ORDAA-A-D. 
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RSTS/E SYSTEM NOTES 


1.0 


2.0 


INTRODUCTION 


Installation Notes are a compendium of information which 
provides the customer with a maintenance notebook on cur- 
rent software documentation and the status of known soft- 
ware problems. The Notes are supplemented with articles 
in future monthly Software Dispatches sent automatically 
during the first year after purchase and later under 
maintenance contract. Contact your DIGITAL field office 
for maintenance information. 


FILING 
A system has been devised for RSTS/E and its components 


to allow each article to be filed in its proper place. 
The key to this system is Figure 1 below. 


SOFTWARE PRODUCT VERSION 
COMPONENT VERSION 


SUBPROGRAM OR ADDITIONAL INFORMATION SEQUENCE PAGE 
REPLACEMENT ARTICLE ORIGINAL DATE 


Figure 1. Coding block 


Each month the customer should take apart the Software Dispatch 
sent him and insert the pages in the notebook. 


The articles are referenced by sequence number. Article sequence 
numbers take this form: MODULE.COMPONENT.SEQUENCE or numerically 
this would be 2.3.1. As an article is added to each component, 
it is assigned the next sequence number. 


All other information in the coding block is to further clarify 
the article and is not specifically for filing. 


(1A) Version of the software product. 

(2A) Version number of component. 

(2B) Other information helpful to the user. 
(3A) Number of article pages. 


(4) An "X" in this block indicates a new article. 


(5) A number in this block indicates an article republished for 
revision or correction and specifies the number of revisions. 
For example, the second revision of an article which originally 
appeared in June 1974 is shown in Figure 2. 


(5A) Original date of a revised article. 


NEW 


EI 


REPLACEMENT ARTICLE 


ORIGINAL DATE 
June 1974 


Figure 2. Coding block showing second revision. 


2.1 Software Modules and Components 


1. RSTS/E SYSGEN 


1. 
2. 
3. 
4. 
5. 


SYSGEN Patches 
Software Notes 
Hardware Notes 
DOS/BATCH Notes 
Batch Files 


2. RSTS/E Executive 


1. INIT Patches 

2. INIT Notes 

3. MONITOR Patches 

4. MONITOR Notes 

5. Terminal Service (TTY) Patches 
6. Terminal Service (TTY) Notes 
7. File Processor (FIP) Patches 
8. File Processor (FIP) Notes 

9. Device Driver Patches 
10. Device Driver Notes 

3. RSTS/E BASIC~PLUS m 

1. BASIC Patches 

2. Notes/Programming Hints 

3. Concise Command Language (CCL) 
4. Math Packages 

5. Matrix Functions 

6. Print-Using 

7. Record I/O 

8. Virtual Core 


4. RSTS/E Utilities 
1. ANALYS 
2. BACKUP, BACKDK 
3. BATCH, BATDCD 


4. BUILD 

5. COPY 

6. CREF 

7. DIRECT 

8. DISPLY, VTO5, VT50 
9. DSKINT 
10. EDIT, EDITCH 

ll. ERRCPY 

12. ERRCRS 


13.  ERRDIS, ERRDI1 
14. FILCOM 


15. GRIPE 
16. INIT 
17. INSTAL 
18. INUSE 
19. LNGBLD 
20. LOGIN 
21. LOGOUT 
22. MONEY 
23. ODT 
24. PLEASE 
25. PIP 


26. PIPEXT 
27. PRIOR 
28. QUE 

29. QUEMAN 
30. QUOLST 


31. REACT 
32. REORDR 
33.  RESEQ 
34. RJ2780 
35. RUNOFF 
36. SHUTUP 


37. SPOOL, CHARS 
38. SYSCAT 
39. SYSTAT 


40. TALK 
41. TKB 
42. TTYSET 
43. UMOUNT 
44. UTILTY 


45. TSTBLD 
46. CONTRL 


RSTS/E Software Dispatch 
December 1975 


This page replaces page 9 formerly appearing in the VO6A-02 Software 
Dispatch Review. Please note changes below (Section 8., nos. 1, 2, 
3 and 4). 


47. CPEXER 
48. CREXER 
49. DBEXER 
50. DFEXER 
51. DKEXER 


52. DPEXER 
53.  DTEXER 
54. KBEXER 
55.  LPEXER 
56. MTEXER 
57. PPEXER 
58. PREXER 


5. RSTS/E System Documentation 


1. RSTS/E Documentation Directory DEC~11-ORDAA-A-D 
2. RSTS/E System Generation Manual DEC-11-ORGNA-A-D 
3.  RSTS/E System Manager's Guide DEC-11-ORSMD-A-D 
4. RSTS-11 System's User's Guide DEC-11-ORSUA-D-D 
5 BASIC-PLUS Language Manual DEC-11-ORBPB-A-D 
6. RSTS/E Programming Manual DEC-11-ORPMA-A-D 
7. RSTS/E Reliability Test Manual DEC-11-ORSRB-B-D 
8. RSTS/E System Installation Notes DEC~11-ORINB-C-D 
9 RUNOFF User's Guide DEC-11-URUNA-B-D 


6. COBOL-11 (Software Product Description 12.40.1) 
1. Patches 
2. Notes/Programming Hints 
3. COBOL-11 User's Manual DEC-11-LCUGA-A-D 
4. Reference Manual DEC-11-LCOBA-B-D 


7. SORT-11 (Software Product Description 12.7.0) 
1. Patches 
2. Notes/Programming Hints 
3.  SORT-11 User's Manual DEC-11-USTMA-B-D 


8. RSTS/E 2780 Emulator (Software Product Description 10.50.0) 
1. 2780 Notes/Programming Hints 
2. 2780 Patches 
3. 2780 User's Manual DEC-11-ORJEA-A-D 
4. 2780 RCS Installation Notes DEC-11-CCDNA-A-D 


9. RSTS-11 SORT 
l. Notes/Programming Hints 


2. SORT 

3. KEYDMP 
4. MOWIK 
5. OQWIK 
6. SQWIK 


7.  XQWIK 
8. RSTS-11 SORT User's Manual 


10. RSTS/E Commercial Extensions (IAM) 
1. Notes/Programming Hints 


2. IAMGEN 
3. IAMCRI 
4. IAMDMP 
5. IAMVFY 
6. IAMPRI 
7. %IAMFNS 


8. Commercial Extensions User's Manual 
9. 4-Word Decimal Arithmetic Package 


11. RSTS/E WISE 


12. RSTS/E EDU-DECAL (Software Product Description 15.85.0) 


13. PICTURE BOOK (Software Product Description 15.65.0) 
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3.0 


3.1 


SOFTWARE PERFORMANCE REPORTS 


Each new installation is provided with Software Performance Report 
(SPR) forms. The SPR form enables users to suggest enhancements to 
or report problems with Digital Equipment Corporation software or 
documentation. When a problem is encountered, an SPR should be 
completed and mailed to the local SPR Center. (See inside back 
cover.) 


Responses "sill be sent to the name and address appearing on the 
form. Additional SPR forms may be obtained by writing to the 
local SPR Center. SPR response is free for a period of one year 
and by subscription thereafter. 


Software Performance Report Guidelines 


This guideline for SPR completion is provided to ensure adequate 
information is included to prevent delays in processing. 


Every SPR form should be completely filled out. Information such 
as CPU type, system device, and memory size must always be included. 
An adequate and clear description of the problem is very important 
and will certainly speed response. 


It is important to know the complete hardware configuration for 
that installation, including system disk, amount of core memory, 
hardware options such as hardware, FPP, and peripherals on the 
system. Similarly, it is important to know what RSTS/E monitor 
options were specified at System Generation time, including two- 

or four-word math packages and BASIC-PLUS options. The easiest 
way to provide this information is to attach a listing of the 
CONFIG.MAC and SYSGEN.BAT files created during System Generation 

or include a copy of the printout from the keyboard printouts which 
demonstrate the problem. 


In addition to the above points, it is important to specify the 
following items when submitting an SPR concerning a BASIC~PLUS 
CUSP: 

1. The name of the cusp. 


2. The version number and edit level of the CUSP. (Some CUSPs have 
several edit levels of the same version in the field.) 


3. Under what account(s) the CUSP failed; that is, distinguish 
between privileged or nonprivileged. 


4. The PRIORITY and SWAP MAX which the CUSP was running when 
it failed. 


5. A terminal printout of relevant command strings. 


6. A complete list of any modifications which have been made 
to the CUSP at the user installation. (This will not only 
help to determine the possible cause of failure but will also 
suggest changes to improve CUSP reliability.) 


Software Support is unable to analyze crash dumps submitted with Software 
Performance Reports (SPRs) without, as an absolute minimum, a listing of 
the system load map. Also, a machine-readable copy of the dump file 
[2,1] CRASH.SYS is very desirable, either on DECtape or magtape. 


Before submitting an SPR, the user should review the Software Dispatch 
to ensure that the problem has not already been published. 
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4.0 DIFFERENCES BETWEEN RSTS/E V06A-02 AND VO5C-01 


RSTS/E VQ6A-02 introduces new hardware support and_ several 
new software features. 1974 ANSI COBOL and the PDP-11 SORT are 
avallable for use with this release. All known V05C-01 problems 
have been corrected. The manual set has been revised to reflect 
the new hardware additions and software changes. System changes 
are summarized In these notes and specific details are presented 
In the appropriate manuals. 


VO6A-02 was submitted to the Software Distribution Center on 
June 26, 1975 and will begin volume shipments during the last 
part of July. Customers In the first year following RSTS/E 
Installation and subscribers to the RSTS/E Standard Program 
Update Service wlll receive VO6A-02 at no extra charge. 


1. NEW HARDWARE SUPPORT 


Support for the PDP-11/70, RPO02 Moving Head Dtsk, and _ the 
RX11/RX01 Floppy DIsk System was added In VO6A-02. Important 
changes have also been made In device drivers and system code to 
Increase system rellabllity. V0O6A-02 fully supports the extended 
parity checking features of the PDP-11/70. Offset read 
capability was added to the RPO4 driver. And the system will now 
permit operation of the system disk from any drive unlit. 


The PDP=-11/70 features extended memory addressing to 
1 Million words, hlgh speed bipolar cache memory, a muiti-bus 
structure with extensive parity checking on memory and 1/0 data 
paths, Integral memory management unfit, UNIBUS MAP, and high 


speed perlpheral controllers. 


RSTS/E VQ6A-02 supports the hardware maximum of 1 MIl11 fon 
words of maln memory on the 11/70. On large systems, the 
previous maximum of 124K words was often a limiting factor for 
system performance. The 11/70 expanded memory capability will 
allow Increased throughput and expansion capability for RSTS/E 
systems. 


VO6A-02 provides error logging of all memory parity errors 
and supports the extended parity checking capabIlities of the 
11/70. Parity errors In user memory affect only one user and, If 
the error fs reproducible (hard), the system wlll lock that 1K 
section from further use (equivalent to memory parlty support on 
the 11/40 and 11/45). All 11/70 cache warnings are error logged 
and two warnings within the same minute wlll cause the system to 
disable that half of the cache memory system. RSTS/E contInues 
running with one or both cache groups. disabled. Memory parlty 
errors detected by the RH70 controllers are error logged and the 
operation Is retried. Finally, alt UNIBUS Aborts are error 
logged. 


The 11/70 UNIBUS MAP translates 18 bIlt UNIBUS addresses to 
22 bit main memory addresses through a set of 31 mapping 
registers. This translation ts required for all NPR data 
transfers from UNIBUS devices to 11/70 memory. RSTS/E uses a 
flxed allocation scheme for the UNIBUS MAP. Seven registers are 
used to map the memory occupled by the RSTS/E Monitor. ThIs set 
of registers Is used by all NPR devices which transfer to/from 
Monitor buffers. Devices In this category under RSTS/E are the 
TC1l DECtape, CD11 Card Reader, and DH11 Multiplexer. One set of 
8 mapping registers Its allocated to each UNIBUS perlpheral whIich 
performs NPR transfers directly Into user memory. The supported 
devices In this category are the RC11/RS64 and RF11/RS11 Fixed 
Head Disk systems, the RK11/RK03/RKO5 and RP11C/RP02/RP03 Moving 
Head DIsk systems, and the TM11/TU10 magtape system. Up to three 
such devices may be used on RSTS/E 11/70 systems. A third class 
of NPR devices are the MASSBUS' perlpherals Including the 
RSO3/RSO4 FIxed Head Disk system, RPO4 Moving Head DIsk_ system, 
and the TM02/TU16 magtape system. On the PDP=-11/70 these devices 
are connected through the RH70 perlpheral controllers which are 
capable of 22 bit memory addressing. No address translation Is 
requlred for data transfers on these devices. 


Support for the RP02 Moving Head Disk was added in V06A-02. 
The RPO02 {fs an economical 10 MIlllfon word disk drive similar In 
appearance to the larger  RPO3. Except for minor size 
considerations, the RPO2 Is treated exactly lIke an RPO3. The 
RPO2 may be used as the system disk or an auxiliary mountable 
disk, elther In the public structure or as a private pack. RPQ2 
and RPO3 drives may be mixed In any combInatlon on the RPI1IC 
controller. The system will automatically determine the type of 
each drive. 


The RX11/RX01 Floppy Disk System Is also supported In this 
release. The floppy disk Is a highly rellable random access 
storage device about the size of a 45 RPM record. The fexlble 
recording disk rotates Inside a flat envelope which has slots for 
the read/write head, spindle, etc. Each floppy can store 256K 
characters. The controller will handle two RX01 drives and up to 
four controllers (8 drives) can be supported under RSTS/E. Due 
to lack of an Industry standard for a floppy disk file structure, 
only non flle-structured support Is provided in this release. A 
floppy disk may be accessed In elther of two modes selected by 
the MODE parameter on the OPEN In BASIC=PLUS. In Sector mode all 
2002 disk sectors (128 bytes/sector) are avallable to the user 
program. Detection and writing of "deleted data marks" Is 
supported for IBM compatIbIilIty. In Block mode 494 disk blocks 
(512 bytes/block) are avallable. Block mode Is compatible with 
RT11, RSX-11M, and RSX-11D floppy support (DEC standard 2 to 1 
Interleaving with Track * 6 skew). 
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Offset read support for RPO4& disk drives was also added in 
this release. RPO4 drives are capable of offsetting the heads up 
to 1200 micro-Inches on elther side of a track centerline. lf 
data cannot be read without error after 16 retries, the driver 
wlll use offset positlonIng to recover the data. A data error 
will not be returned to the user program unless all retrles and 
ali offset reads are unsuccessful. ECC correction of burst 
errors was supported In V0O5C-01 and Is retained In VO6A-02. All 
data errors, whether corrected by ECC or offset positioning, are 
error logged. The combination of ECC and offset read support 
permits extremely reliable operation of the RPOL disk subsystem. 


In previous RSTS/E systems, the system disk could only be 
Operated on drive unit 0. If this unit was down for repalr or 
Preventive malntenance, the system was also down. This 
dependence on unit 0 has been eliminated In VO6A-02. The DOS 
based system generation still relles on unit 0 and the resultant 
RSTS/E system disk must be bootstrapped once on unit 0. 
deve ontety the system disk may be operated on any avallable 

rive. 


Il. SYSTEM GENERATION 


The system generation procedures changed very little from 
VO5C-01 to VO06A-02. One question was added to determine If the 
RSTS/E system would run on an 11/70. A memory sIze question was 
also added since it Is no longer practical to default the nemory 
allocation table (CORTBL) size to handle the maximum possible 
memory configuration (previously 124K but now 1024K on the 
11/70). One final question was added for floppy disks. 


111. INITIALIZATION CODE 


Many Internal changes were made to the Initfallzation Code 
for 11/70 support, RPO2 support, and system disk unlt number 
Independence. INIT performs several consistency checks related 
to the 11/70, sets up the UNIBUS MAP, and enables the 11/70 cache 
memory system. WIth regard to the RP02, the Initlallzatlon Code 
checks the type of all RP drives and sets up the appropriate INIT 
and Monitor tables accordingly. The secondary bootstraps 
Installed by INIT on the system disk were modified for thls 
release to pass the unlt number of the drive booted. INIT uses 
this Information to Implement unlt number Independence. Although 
somewhat extenslve, these Internal changes are transparent to the 
user. The only visible changes are In the DSKINT, DEFAULT, and 
BOOT Initlalization options described below. 


The method used by DSKINT to format RP02 and RPO3 disks was 
changed for this release. There was some difficulty wlth RPO2 
disks usIng automatic controller formatting so a software 
formatter was Installed to clrcumvent the problem. The manual 
setting of the format enable switch on the RP11C Is no longer 
required when formatting RPO3 or RPO2 disk packs. The memory 
allocation table printed by DEFAULT was changed to accomodate 
large memory conflguratlons (11/70). The table Is more conclse 
but the Information displayed remains essentlally the same as_ In 
previous releases. A new CACHE command was added to the memory 
allocation options available through DEFAULT. CACHE allows a 
section of memory to be exclusively reserved for FIP Buffering. 
This capabllity Is dIlscussed In greater detall In Section V_ of 
these notes. The system magtape labelling default (DOS or ANS!) 
Is also specifled In response to a new MAGTAPE LABELLING DEFAULT 
query printed by the DEFAULT option. Finally, the BOOT option 
will now allow a non-zero disk unfit to be bootstrapped. 


IV. COBOL AND SORT11 


PDP-11 COBOL and the PDP-11 Sort package (SORT11) are 
avallable for use with the VO06A-02 release of RSTS/E. PDP-11 
COBOL conforms to the speciflcation published by the American 
Natlonal Standards Institute (ANSI) In the document Amerltcan 
Natlonal Standard COBOL, X3.23-1974. PDP-11 COBOL fs _ properly 
defined as a subset of ANSI COBOL and as such meets the ANSI-1974 
low level specifications with several additions and omlsslons. 
Specific features are outlined In the PDP-11 COBOL Software 
Product Description (DEC-11-XPDBU-A-D) avallable from Software 
Communticatlons. This ts exactly the same COBOL announced 
previously for RSX-11D. SORT11 Is also the same sort package 
avallable under RSX systems. COBOL and SORT11 are distributed 
together on DECtape, magtape, and RK cartridge disk. The package 
is sold and supported as a separate product and Is not Included 
In the standard RSTS/E distribution klIts. 


Both COBOL and SORT11 are Interfaced to the RSTS/E system 
through a shareable Iltbrary of routines (collectively called 
RTSLIB) which emulate the Flie ‘Sontrol Services of RSX-11D. 
RTSLIB operates as an auxiliary Run Time System similar to 
BASIC-PLUS. RTSLIB Is dynamically loaded whenever COBOL or 
SORT11 Is called. This single copy Is shared by all users, Is 
not swapped, and Is not unloaded (removed from memory) until the 
access count goes to zero. Each user receives a separate copy of 
the COBOL language processor or SORT11 which Is swapped. 


RTSLIB Is Included In the RSTS/E distribution kits since It 
Is unique to the RSTS/E system. Automated build procedures for 
RTSLIB (similar to the standard system JlIbrary bulld) are 
documented In the RSTS/E System Generation Manual. Detalled 
procedures for Installing COBOL and SORT11 are also presented In 
that document. 
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V. MONITOR AND FILE PROCESSOR 


ANSI standard magtape labelling for TU16 and TU10 drives Is 
avallable In RSTS/E VO6A-02. The default record format Is ASCII 
stream data with Imbedded carrlage control (ANS! "U"). ANSI "D" 
and "FE" formats are supported In PIP, the line printer spooler 
and RTSLIB (1l.e. COBOL and SORT11). MultI-volume fille support 
Is not provided In this' release. ANSI magtapes may be 
Interchanged with RSX-11D V6A, RT11, and OS/VS 360/370 provided 
the IBM system Is generated for ANSI compatibility. 


DOS magtape format Is also supported In this release as In 
previous verslons of RSTS/E. The magtape labelling default is 
set wlth the DEFAULT option mentioned above. This default may be 
overridden when the magtape unlit Is ASSIGNed (e.g. ASSIGN 
MT1:.ANSI) or with the MODE modifier on a magtape fiie OPEN 
statement In BASIC-PLUS. When a magtape fille Is created in ANSI 
format, the OPEN statement can specify the record format, record 
length, buffer size, and carriage control modifier character. 
This Information Is returned by the magtape speclal functlon call 
when an existing ANSI magtape flle Is opened. 


FIP Buffering was Introduced In V05C-01 and was extended for 
this release. The option will now operate In any of three modes 
to speed up fille processing. If the option Is selected at system 
generation time but memory Is not reserved for FIP Buffering, the 
system wlll use the small buffer pool for this purpose. ThIs was 
the only mode of operation avallable In V05C-01. When less than 
8K of memory Is reserved for FIP Buffering, the system will use 
both the dedicated memory area and the small buffer pool. 
Finally, If 8K or more Is reserved, the FIP Buffering module will 
use only the reserved area of memory. This latter mode of 
operation Is the most efficient. A new SYS call Is also provided 
In this release to enable or disable FIP Buffering. 


Fil te f extended In VOGA-02 to Include an 
addi ttonal otectlon mechanIsm. Normal Update mode will allow 
any unlocked block In a fille to be written at any time by any of 
the updaters. If the RECORD parameter on a PUT Is missing or 
zero, the next sequential block In the fille Is written. This Is 
not normally the desIred result when processing a flle In Update 
Mode. The Protected Update Mode will not allow a block to _ be 
written unless It has been previously read and locked. The 
prozram declares Its Intention to update the block by dolng the 
read before the write. 


A speclal MODE Is also required to gain wrlte access to a 
User File DlIrectory. In previous releases It was far too easy 
for a privileged program to OPEN and write Into a UFD accidently. 
The special mode Is merely a protection mechanism to prevent 
Inadvertent dIistructlion of critical directory Information. 


A few changes were made In the Scheduler and accounting 
routines. The Scheduler will occaslonally give a temporary 
priority boost to disk bound jobs to avold swaps and _ Improve 
throughput. Run burst, which can be set by PRIOR or through a 
SYS call, must now be a multIple of tenths of a second (lI.e. 
5,10,15,20... for 50 hz. or 6,12,18,... for 60 Hz.) for better 
accounting data resolution. Partial ticks (tenths of seconds) 
accrued during one run are also saved for the next run to avold 
round off errors. 


The line printer driver [tn V0O5C-01 would buffer any output 
request even If the printer was off line. An error was returned 
but If the program Ignored the error and simply continued output 
to the printer, requests would continue to be honored until the 
buffer pool was fllled. Since small buffers are used for many 
different purposes, this could have a serlfous effect on system 
performance. In VO6A-02 only the first request for printer 
output Is buffered when the printer Its off line. Subsequent 
attempts wlll return Immediately with the "Device Hung or write 
Locked" error and the data Is not buffered. 


VI. TERMINAL SERVICE 


DH11 serv!ce was reworked to reduce the number of output 
Interrupts. In previous releases, any character buffered for a 
DH11 1lIne would also request an output’ f[nterrupt. This caused 
many extra [Interrupts for Idle 1lfnes for which no output was 
buffered. The extra [Interrupts Increased the overhead In the 
terminal service and reduced the maximum sustalned character 
rate. In VO6A-02 output [nterrupts are requested only after a 
full request (one or more characters) Is buffered and then only 
If the selected line Is Idle. The net effect Is fewer Interrupts 
and greater traffic handling capabl lity. 


In thls release one small buffer Is always malntalned for 
each DH11 line. This avofds many of the small buffer allocatlons 
and deallocations previously encountered with high speed lines. 


In VO5C-01 It was possible for one high speed device to 
monopollze the services of a program processing binary Input from 
multiple terminals. A simple (transparent) round robIn_ scanner 
was added to multI-termlInal service to avoid this problem. 


VII. BASIC=PLUS 


There were very few changes to BASIC=-PLUS for this. release. 
Special MODEs for magtape processing, Protected Fille Update, and 
access to UFDs were mentloned [In previous” secttons. One new 
function was added to CVT$$ to handle quoted strings. These 
additions are documented in the BASIC-PLUS Language Manual. All 
changes are upward compatible from V05C-01 so no changes are 
required to existing programs. 
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VIII. SYSTEM LIBRARY PROGRAMS 


SPSS 


There were several changes In the system programs for 
VO6A-02. The REORDR program was added to restructure disk 
directorles for fast access. PIP was completely rewrltten. 
spooling package. Minor modifications were also made to SHUTUP, 
UTILTY, VT5DPY, and SYSTAT. 


REORDR Is a new program for V06A-02. This utllty provides a 
convenient means to reorganize disk directorles. RSTS/E User 
Flle Directorles consist of a number of 256 word disk segments 
divided Into elght word blocks. Each fille has a name block, an 
accounting block, and some number of retrieval blocks which 
contaln the polnters to flle data. The name block Is lInked to 
the accounting block and to the first retrieval block. Retrieval 
blocks are lInked together as a singly linked lIst. Name blocks 
also contaln a link to the name block for the next file In the 
UFD. This type of directory structure becomes progressIvely less 
efficient as flles are created and deleted under any given 
account. SInce the elght word blocks which describe a flle can 
be scattered across several disk segments, many disk accesses may 
be required to search a directory or to access directory 
Information. REORDR provides the means to restructure 
directories for optimal access. The program will gather all name 
blocks Into one disk segment (If possible) to speed directory 
searches. The accounting block and all retrleval blocks for a 
file are also grouped together In the same disk segment to reduce 
the number of disk accesses for dlrectory Information. The 
directorles are modiffed In place with no change In the sIze or 
location of the directory segments on disk. Actual flle data Is 
not moved or accessed In any way. REORDR can operate on a sIngle 
account, selected groups of accounts, or all accounts. Perlodic 
reorganization of the directorles can have a dramatic effect on 
system performance. 


PIP was completely rewritten for VO06A-02. It will now 
handle wild card specifications In flle transfers, deletions, 
rename commands, and directory lIstIngs. PIP wlll also read and 
write ANSI magtapes, accept Indirect command flles, and read DOS 
disks (all functions of DOSPIP). 


The INIT program was modified to process Indirect command 
flles and to accept alternate command files (I.e. something 
other than START.CTL) to control system start up. This feature 
will allow the system manager to perform non-standard system 
operations (e.g. run the REORDR program) before opening the 
system to time sharing. Two new commands, ATTACH and DETACH, 
were added to allow INIT to use only a single keyboard for start 
up. 


A LOCK switch was added to the UMOUNT program to allow a 
disk to be mounted but left In the "locked" state. The program 
now checks for public disks and non-RSTS disks and returns a 
meaningful error message In elther case. UMOUNT will also accept 
magtape commands to assign ANSI or DOS labelling default, and 
provides a mechanism for rewlndIng the tape after use. 


RUNOFF has been Improved by the addition of an _ overstrike 
capabllity, a character conversion feature, DATE and NODATE 
commands, and an abbreviation for the .INDEX command (.X). 
Overstrike allows two or more characters to be written In one 
print position (e.g. overstrike = with / to. print F). 
Character conversion allows translation of any character to any 
other character for output. DATE and NODATE enable and disable 
printing of the current system date on each page of output. 
Underllning of non-quoted spaces Is also possIble with this 
verslon of RUNOFF. 


Two new commands have been added to BATCH for the V06A-02 
release. $COBOL will tnvoke the COBOL language processor and 
$SORT wlll call the SORT11 utIilty program. A job card PRIORITY 
eta was also added to set the priority at whIch the batch job 
will run. 


COPY will now accept DENSITY and PARITY switches for greater 
flexibility In magtape copy operations. The spooling package was 
extended to support ANSI format magtapes and varlous types of 
simple forms control. UTILTY and SHUTUP were modified to allow 
loading, unloading, and control of auxIillary Run Time Systems 
such as RTSLIB. Display of Run Time System Information was added 
to VT5DPY and SYSTAT. 


IX. DOCUMENTATION 


The RSTS/E System Manager's Gulde was divided Into a System 
Generation Manual and a System Manager's Guide for this release. 
The System Generation Manual Is concerned with the procedures for 
generating the system and using the Initiallzation Code options 
to best advantage. System Ilbrary and COBOL bulld procedures are 
also Included In thls manual. The new System Manager's Gulde 
describes certain utllIlty programs and presents guldelines' for 
proper system management. 


The BASIC-PLUS Language Manual was also divided Into two 
manuals for thls release. The Language Manual Is now smaller but 
describes all language features normally used by novice and 
Intermediate level BASIC-PLUS programmers. A new Programming 
Manual describes non flle structured disk operations and other 
device dependent detalls for the experlenced user. The chapter 


on system functlon calls formerly Included In the System 


Manager's Gulde can now be found In this document. 


All VO5C-01 addendums and documentation for V06A-02 features 
were Incorporated Into the manual set. 
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10. 


13. 
14. 


OLD PROBLEMS CORRECTED 


There were several problems [In V05C-01 which were’ corrected 
that release by patches. The approprlate changes were made 
VO6A-02. These Include ; 


The BASIC-PLUS SIN functlon generated a "Floating Poltnt 
Error" for some arguments very close to N * PI for Integral 
N. 


An error In the [Initlalizatlon option DSKINT which could 
result In destruction of the system disk under certaln 
unusual clrcumstances. 


An error in the power fall auto-restart code which prevented 
recovery from power fall on systems with an RPO system disk. 


An error In non file structured DECtape processing whereby an 
attempt to read block 1 backwards resulted In block 1 belIng 
read forward. 


When usIng the BASIC=PLUS MAT INPUT statement, a number [In 
E-format could cause a "Not Enough Data In Record" error If 
It was the last number In the record and did not completely 
fill the record. 


An error In the BASIC-PLUS Run Time System which caused 
Memory Management Violations when APPENDIng programs whIch 
redimensfoned arrays and exceeded the avallable core. 


Under certain conditlons an Immediate mode RETURN’ statement 
would result In confusIng error messages. 


Deletion of the last line of a BASIC=PLUS program when a 
compile command was’ Issued with a syntactically fncorrect 
flle name. 

Incorrect handling of embedded quotes by the CVT$$ function. 


An error [In the RK11 overlapped seek driver which would 
occaslonally result In a device timeout. 


Incorrect tape posIitionitng on magtape file structured 
OPEN ... FOR OUTPUT If the file did not already exlIst on the 
tape. The fille was written beyond the logical end of tape. 
An error In FILCOM which caused random Incorrect results. 
Incorrect reporting of free disk blocks by SYSTAT and VT5DPY. 


Problems In RUNOFF with auto-paragraph mode, multiple "Print 
Index" commands, and underlining. 


RSTS/E VO6A-02 SYSTEM NOTES Sequence 


RSTS/E SYSGEN 

PROBLEM WITH RF11 SYSTEM GENERATION DISK--SYSGEN PATCH 
PROBLEM WITH RF11 SYSTEM DISK--SYSGEN PATCH 

RETRACTION 

RUNNING WITH NO SWITCH REGISTER OR DISPLAY LIGHTS 
MAGTAPE LABELLING DEFAULT 

OVERLAPPED SEEK DRIVER FOR RP11-C/RP03 DISK SUBSYSTEM 


CD11 UNIBUS ADDRESS 
GENERATING RSTS/E V0O6A-02 FOR A PDP-11 WITH RPO5 DISKS 
INSUFFICIENT CONTIGUOUS SPACE SYSTEM GENERATION 
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RSTS/R EXECUTIVE 


STACK LIMIT WARNING MESSAGE--OPTIONAL INIT PATCH 

RPO1 AND/OR RP03 ERRORS LOGGED AT START OF TIMESHARING 

SWAP.SYS FILE PROBLEM 

LOSS OF USABLE SPACE ON FIXED HEAD SWAPPING DISKS 

REFRESHING A SYSTEM DISK AFTER REPLACING MONITOR CIL MAY CAUSE 
DOUBLY ALLOCATED BLOCKS 

ACCOUNTING ROUTINES 

CORRECT OPERATION OF FORTRAN IV 

REPLACE COMMANDS 

COMPTLE COMMAND 

DELETION OF WRITE-PROTECTED FILES 

PROTECTION VIOLATION WHEN SAVEING FILES 

PROTECTION CODE OF <f#> CANNOT BE WRITTEN 

ERROR IN 2741 CALL 360 BASIC CODE CONVERSION TABLE 

RANDOM TERMINAL OUTPUT ON DH11 LINES 

SCANER UTILITY FOR FINDING PATCH LOCATIONS 

HUNG TELETYPE ERRORS 

INCORRECT CURSOR POSITIONING WHEN ECHO IS DISABLED 

CRASH CAUSED BY DISABLED DH11 LINES 

2741 TERMINAL INTERFACE WIRING 

2741 HARDWARE OPTIONS REQUIRED BY RSTS/E 

NOTE ON LOWER AND UPPER CASE CHARACTERS 

NOISY TELEPHONE LINES 

HUNG TELETYPE ERRORS ON DC1l LINES 

UNDERSTANDING SYNCHRONIZATION DELAYS 

TERMINAL FILL CHARACTERS 

KEYBOARD ASSIGNMENTS--OPTIONAL FILE PROCESSOR PATCH 

MAGTAPE DENSITY/PARITY DEFAULTS--OPTIONAL FILE PROCESSOR PATCH 

PROBLEM WITH FILE DELETION FUNCTION 

USER FILE DIRECTORIES 

FILE PROTECTION CODES 

SPECIAL LINE PRINTER DRUMS-~-OPTIONAL DRIVER PATCH 

RPO4 POSITION FAILURE 

DIFFERENCES BETWEEN DEC AND IBM CARD CODES 

RPO04 TEMPORARY UNSAFE CONDITIONS 

LINE PRINTER INTERRUPT VECTOR ASSIGNMENTS 

CR11 CARD READER NOTES 

CR11 CARD READER NOTES 
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*Patch 
+Replacement 


This is a complete listing of all articles for RSTS/E and its subordinate or related 
products. In the case of related software, missing sequences pertain to problems 
unique to other versions of the same product; they also can indicate problems unique 
to interaction with other major operating systems. EXTRACTED articles are indicated: 
EXTRACTION. 


RSTS/E BASIC-PLUS 

PROBLEM WITH "SAVE" AND "REPLACE"--BASIC PATCH 
AUXILIARY LIBRARY ACCOUNTS--OPTIONAL SYSTEM PATCH 
SPECIAL PRINT USING OPTIONS--OPTIONAL BASIC PATCH 
ARRAY DATA DESTROYED BY I/O BUFFER ALLOCATION 
CHANGING DEFAULT SCALE FACTOR 

THE LEXICAL ANALYZER DOES NOT POOL LITERAL FLOATING POINT 1 
SUBSCRIPTING ERRORS 

MAT INVERSE FAILS AT SCALE FACTOR 6 

IMMEDIATE MODE "RETURN" 

FILE NOT CLOSED PROPERLY 

PRIVILEGED PROGRAM CHAINING TO A .BAS FILE 

MEMORY MANAGEMENT VIOLATIONS: USING SPACES 
REDIMENSIONING CAUSES ERRORS 

REPLACE MAY, DELETE A PROGRAM WITHOUT REPLACING IT 
COMPILED PROGRAM INCOMPATIBILITY 

SOURCE LEVEL STATEMENTS IN BASIC 

SIMULTANEOUS ACCESS TO A FILE BY MANY USERS 

PASSING EOT MARK ON MAGTAPE 

AN "ON ERROR GO TO" WITH AN INCORRECT TARGET STATEMENT NUMBER 
INPUT GIVING CONFUSING RESULTS 

FLOATING POINT NUMBERS THAT APPEAR TO BE EQUAL 
SETTING VTO5 FOR UP (?)CURSOR 

SCALE FACTORS FOR V06A-02 

OBTAINING JOB NUMBER USING THE PEEK FUNCTION 

PROGRAM LOST-SORRY MESSAGES 

TRUE-FALSE VALUES AND THE NOT OPERATOR 

FLOATING POINT ANAMOLIES 

MANIPUL- ‘ION OF VIRTUAL STRINGS CONTAINING NULL BYTES 


RSTS/E UTILITIES 

POSSIBILITY OF ZEROING AN ACCOUNT 

BACKING UP RP03 OR RPO4 

BACKUP PUBLIC-TO-PUBLIC DISK TRANSFERS 

BACKUP CLUSTERSIZE ERRORS 

RETAINING ORIGINAL CREATION DATES WITH BACKUP 
BACKUP FAILS TO RETAIN PROTECTION CODE 

BACKUP DETACH PROBLEM 

BATCH DOES NOT WORK WITH DECIMAL ARITHMETIC 
CREF GOES INTO AN INFINITE LOOP 

USING WILDCARD COMMANDS WITH DIRECT 

SETTING TERMINAL SPEEDS 

HANGING SINIT 

RUN BURST NOT RESET IN LOGIN 

COPYING .BAC FILES TO DECTAPE 

COPYING A FILE INTO THE SAME ACCOUNT WITH SAME NAME 
MISCELLANEOUS PROBLEMS 

FAILURE TO INITIALIZE QUEUE.SYS FILE--QUEMAN 
QUEUING FROM MAGTAPE 

UNDERLINING TEXT WITH RUNOFF 

PROBLEMS WITH RUNOFF 

QUEMAN FAILS TO RESPOND TO SHUTUP'S SECOND QUEMAN MESSAGE 
USER ACCOUNT PROTECTION 

TTYSET HANDLING OF A VT50H 


RSTS/E SYSTEM DOCUMENTATION 

INCORRECT ORDER NUMBER FOR A DISK CARTRIDGE 

CONCISE COMMAND LANGUAGE (CCL) 

CHANGING LOGIN 

ERROR IN SYSTEM USER'S GUIDE FOR RSTS/E 

RETRACTION 

ERROR IN EXAMPLE PROGRAM DESCRIBING THE XLATE FUNCTION 
ANALOGOUS IF THEN STATEMENT CONTAINS A LOGIC ERROR 
CHANGING LOGIN 

RETRACTION 

DATA RETURNED IN MONITOR TABLE PART II SYS CALL 
DISABLE TERMINAL SYS CALL (FO=8) ON SYSTEM CONSOLE (KBO:) 
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ERROR IN ACCOUNTING DUMP SYS CALL TO FIP 
INCORRECT DESCRIPTION OF LOGOUT SYS CALL 
CONVERTING NUMERIC DATA 


USING ASCII I/O FOR SCRATCH DATA FILES 


COBOL-11 V01.0A 

COBOL LINAGE CLAUSE 

PAGE FORMATTING WITH UNDESIRABLE LINAGE 
DATA ITEM LENGTH RESTRICTION 

COBOL AND UNLABELED TAPES ON RSTS/E 


COBOL-11 V2 

OPEN STATEMENT TO TERMINALS FAILS 

COBRG TOO BIG FOR STANDARD COBOL COMPILER 
CROSS REFERENCE PROBLEM 


UNSTRING VERB USING NONINTEGER DATA ITEMS 
RECORD SIZE APPEARS AS FOUR ASCII BYTES 


RSTS/E 2780 EMULATOR 

2780 PACKAGE NOTE 

EXCESSIVE I/O ERRORS 

REPORTING PROBLEMS WITH 2780 

INSTALLING AND TROUBLESHOOTING 2780s 

IMPROPER HANDLING OF RECEIVED EOT 

LOST AND DUPLICATE RECORDS 

2780 HANDLER FAILURE ON NAK/TIMEOUTS 

RECEIVE ERROR MESSAGES AND CRASHES CAUSED BY THE 2780 PACKAGE 
IMPROPER ZEROING OF LARGE BUFFER 

RUNNING THE 2780 ON A DUP11 INSTEAD OF A DU11 
2780 TIMING OUT IN RECEIVE MODE 


RSTS-11 SORT 

INCORRECT BUILD DIRECTIONS FOR NINE-TRACK MAGTAPE DISTRIBUTION OF SORT 
PARTIAL KEY EXTRACTION FEATURE OF SORT DOES NOT FUNCTION PROPERLY 

SORT RESTRICTS THE LENGTHS OF FILE SPECIFICATIONS 

KEYDMP WILL NOT RETURN PROPERLY TO SORT 

FATAL BASIC-PLUS ERRORS IN MQWIK 

EXTRA BLOCK IN OUTPUT FILE WHEN SORTING TYPE 1 FILE WITHOUT HEADER 
SQWIK DESTROYS KEY FILE HEADER 


ALGORITHM PROBLEM 

SORTING A FILE WITHOUT RECORDS 

PARTIAL KEY EXTRACTION DOES NOT FUNCTION PROPERLY 

XQWIK.BAS DOES NOT ACCEPT A TYPE 1 DATA FILE WITH SIX-BYTE RECORDS 
CORRECTION OF PARTIAL KEY EXTRACTION DESCRIPTION 


RSTS/E COMMERCIAL EXTENSIONS 

CREATION OR REORGANIZATION RESULTS IN INFINITE LOOP 

NUMBER OF RECORDS IN INPUT DATA FILE CALCULATED INCORRECTLY 
NO ERROR MESSAGE IS GIVEN IF INPUT AND OUTPUT NAME THE SAME 
ERROR IN DRF SIZE DURING REORG 

CERTAIN KEY INDEX FILE SIZES CAUSE INFINITE LOOP 

STRTAD ENTRY IN FDB IS NOT ALWAYS RESET 

BLANK RECORDS IN A DATA FILE MAKE INDEX OPTION FAIL 

IAM VERIFY CANNOT HANDLE TOTALLY FULL FILES 

USING FND% MORE THAN ONE IAM FILE 


RECORDS ADDED TO IAM FILES THROUGH FNA% IN SPITE OF OCCURRENCE OF ERROR 


CONVERSION OF DATA FROM THE 4-WORD DECIMAL ARITHMETIC PACKAGE 


*Patch 
+Replacement 
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RSTS/E FORTRAN IV VO6A-02 

UNDERFLOW DETECTION IN FORTRAN OTS 

NULL ARGUMENTS IN FORTRAN SUBSCRIPT LISTS 

INCORRECT PROTECTION CODES FOR UTILITIES 

-OBJECT TIME HOLLERITH FORMAT PROBLEM 

ENCODE/DECODE WITH OBJECT-TIME FORMATTING 

OPENING FILES IN APPEND MODE 

CALL OPEN OF DIRECT ACCESS FILE FAILS 

I-FORMAT CONVERSION ERROR 

COMPUTE-BOUND PROGRAMS MAY ABORT PREMATURELY 

J=J-J GIVES INCORRECT RESULTS 

TRAP TO 4 CORRUPTS PROTECTION CODE 

MISSING LEFT QUOTE IN CALL STATEMENT CAUSES COMPILER TO TRAP 
END OF FILE NOT RECOGNIZED FROM KEYBOARD 

CALL OR FUNCTION ARGUMENTS MAY CAUSE COMPILER TO TRAP 
CLARIFICATION: COMPARING ASCII DATA ITEMS 


SORT-11 V1, V2 for RSTS/E VO6A-02 
REASSIGNING SCRATCH FILE 
DOCUMENTATION UPDATE 


RPG II v7.04 

RUNNING RPGESP VIA CCL COMMAND 

RUNNING RPGXEQ VIA CCL COMMAND 
REPLACEMENT PAGES (RPG II USER'S GUIDE) 
READING PACKED & BINARY RECORDS 

INDEXED PROCESSING WITHIN LIMITS 


*Patch 
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SOFTWARE DISPATCH oe 


PROBLEM WITH RF11 SYSTEM GENERATION DISK - SYSGEN PATCH 


THE SYSLOD program suppliled with the RSTS/E VO6A-02 magtape 
and DECtape distribution kits will not correctly load _ the 
DOS/BATCH monitor onto an RF11 Fixed Head Disk. If the RF1l Is 
used for the RSTS/E System Generation Disk (regardless or whether 
or not the resultant RSTS/E System Disk will also be the RF11), a 
special procedure must be followed to load a correct copy of the 
DOS Monitor before proceeding with the system generation. The 
Incorrect DOS Monitor works sufficiently well to perform the 
procedure presented below but will not make It through the full 
system generation. 


The first several steps In the system generation procedure 
are performed normally as described In the RSTS/E System 
Generation Manual and shown In the example below. The first step 
Ts to load the DOS/BATCH monitor onto the RF11l from the 
distribution DECtape or magtape. This is the step that results 
In the Incorrect copy of the DOS monitor. After SYSLOD 
completes, answer the subsequent questions and log Into the 
DOS/BATCH Monitor. Normally, the next step would be to run PIP 
from the distributton tape, load the first SYSGEN batch file, and 
start the batch generation procedure. Before these steps are 
performed, CILUS Is run from the distribution tape to load a new 
copy of the monitor. 


Once the new copy of the monitor ts toaded, answer the 
several questions and login a second time, run PIP from the 
distributton tape to delete the old monitor and to toad _ the 
SYSGEN batch file. The system generation then proceeds without 
error. 


In the example below, commands which must be entered are 
underlined. Text and prompt characters printed by the DOS 
Monitor are not underlined. All commands are terminated with a 
carrlage return. 


SOFTWARE PRODUCT VERSION 
RSTS/E SYSGEN VO6A-02 
COMPONENT VERSION 

SYSGEN PATCHES N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION SEQUENCE PAGE 
RF11l System Generation Disk 1.1.1 13 


NEW REPLACEMENT ARTICLE ORIGINAL DATE 


SOFTWARE DISPAICH la 


August 1975 


SYSLOD VO8-X2A Normal procedures apply 
CONSOLE FILL COUNT=4 until noted below. 
DATE: Q=JUN=75 

DIALOGUE? 


#DEsMONLIB.CIL/CO:0/HO/BO<xx:MONLIB LCL xx = DT, MT, or MM 
SYSLOD COMPLETE 


ANSWER WITH CARRET OR 'Y' CARRET:~ 1S YOUR LINE FREQ. 50 HERTZ? 
DO YOU WANT TO DISABLE DIALOGUE FOREVER? NO 


DOS/BATCH V9=20C 

DATE: Q-JUN-75 

TIME: 12:00 

DIALOGUE? YES 

DO YOU WANT TO RESET CONSOLE FILL COUNT? YES 
FILL COUNT=4 

ARE ANY DEVICES DOWN? NO 

DO YOU WANT TO CHANGE LINE PRINTER? NO 

HAVE YOU GOT RKO2 DISKS ? NO 


$10 Jil 


DATE: -09-JUN<75 
TIME:-12:00:05 


$RUN xxsCILUS 
CILUS VO8-X6A 


<Aitered procedure begins here> 


#MONLIB NEW/HO/BO<xx:MONLIBsLCL/LO <Load new monitor> 


ANSWER WITH CARRET OR 'Y' CARRET:= IS YOUR LINE FREQ. 50 HERTZ? 
DO YOU WANT TO DISABLE DIALOGUE FOREVER? NO 


SOFTWARE PRODUCT VERSION 
RSTS/E SYSGEN VO6A-02 
COMPONENT VERSION 
SYSGEN PATCHES N/A 
SUBPROGRAM OR ADDITIONAL INFORMATION SEQUENCE 
RF11 System Generation Disk je Eames | 
NEW REPLACEMENT ARTICLE ORIGINAL DATE 
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SOFTWARE DISPATCH RSTS/E 


DOS/BATCH V9-20C 

DATE: Q-JUN@75 

TIME: 12:10 

DIALOGUE? YES 

DO YOU WANT TO RESET CONSOLE FILL COUNT? YES 
FILL COUNT=& 

ARE ANY DEVICES DOWN? NQ 

DO YOU WANT TO CHANGE LINE PRINTER? YES 
LS$11?7 NO 

HOW MANY COLUMNS ? 132 

LOWER CASE? NO 

OVERPRINT? NO 

HAVE YOU GOT RKO2 DISK? NO 


$10 1.1 


DATE:-09-JUN=75 
TIMEs-12:10:15 


$RUN xx:PLP 
PIP V10-02 


#MONLIB,CIL/PR:0 
#MONLIB.CIL/DE 
<Normal procedures resume here> 


#SVelwy se SVCREN 
 MahenPentnhtel tee Mada Ete tS, 


#4 
KI 


$BATCH SYSGEN 


<Follow the System Generation Manual from here on> 


SOFTWARE PRODUCT VERSION 
RSTS/E SYSGEN V06A-02 
COMPONENT VERSION 

SYSGEN PATCHES N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION SEQUENCE PAGE 
RF1l System Generation Disk 1.1.1] 3 OF 5 
NEW REPLACEMENT ARTICLE ORIGINAL DATE 


Ea 
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SOFTWARE DISPATCH RSTS/E 


August 1975 


The RSTS/E VOGA=02 Initlallzation Code contatns an Incorrect 
address which wll! prevent correct operation of the RSTS/E system 
from an RF11/RS11 system disk. The newly generated system ts 
loaded onto the RF11 and wbootstrapped ustIng elther CILUS or 
SYSLOD during the final step of the system generation process. 
The problem will cause an unrecoverable error during the CILUS 
phase of the Initialization Code when the new. system Is 
bootstrapped. SInce the error Is fatal, It Is not possible to 
use the PATCH option of the Initialization Code to correct the 
problem. Consequently, the error must be corrected with a global 
patch when the Initlallzatlon Code fs linked. 


To Install the patch at LINK time, several changes must be 
made to the system generation batch file SYSGEN.BAT using the DOS 
editor (EDIT). The edit is performed Immediately after the 
configuration questions are answered. SYSGEN stops at this point 
to ask If you have any special requirements which require editing 
elther the configuration fille or the batch generation fille. The 
message Indicates the correct procedure to Interrupt the system 
generation and restart the process after changes are made. tn 
this case there Is an edit to perform so the system generation Is 
aborted, the edit made, and the batch process restarted. The 
complete procedure to make the change, Including the necessary 
EDIT commands, Is shown In the example below. 


NOTE: ThIs procedure only applies to RSTS/E V06A-02 systems 
which use the RF11 Fixed Head Disk as the system disk. 
If an RF11 disk ts used as a swapping disk, the patch 
described here is not required. 


PROCEDURE: 


Follow the standard system generation procedures and answer 
all the configuration questions. SYSGEN will then print the 
message shown below. Follow the example exactly as shown to make 
the required change to the SYSGEN.BAT fille and to resume the 
System generation. In this example, all commands which must be 
entered are underlined. Text and prompt characters printed by 
the DOS monitor or by EDIT are not underlined. 


SOFTWARE PRODUCT VERSION 
COMPONENT VERSION 
SUBPROGRAM OR ADDITIONAL INFORMATION SEQUENCE 
NEW REPLACEMENT ARTICLE ORIGINAL DATE 
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SOFTWARE DISPATCH sa 


August 1975 


<Conflguratlon Dialogue Questions> 


SYSGEN: IF YOU HAVE ANY SPECIAL REQUIREMENTS WHICH REQUIRE 
SYSGEN:EDITING EITHER THE CONFIGURATION FILE (CONFIG.MAC) 
SYSGEN:OR THE BATCH GENERATION FILE (SYSGEN.BAT), ABORT 
SYSGEN:NOW BY TYPING "CONTROL/C" AND THEN "TE". RESUME AT 
SYSGEN: THIS POINT BY TYPING "BATCH SYSGN2". OTHERWISE, 
SYSGEN: TYPE "CO" TO CONTINUE WITH SYSTEM GENERATION : 


A050 000000 
$tc Abort the system generation 
~TE<er> here with CONTROL/C and TE 


TIME: -12:10:24 
DOS/BATCH V9-20C 


SRUN xx EDIT xx = DT, MT, MM, or DK 
EDIT-11 V0O7-03 


#SYSGEN.BAT<SYSGEN.BAT<er> <cr> denotes carrlage return 
O<er>? 
#AB =INIT3: 


#/E<er> 

<1Lf> <1f> denotes line feed 
e-3L<er> 

#INIT/SQ, INIT<RSTS.STB/B:22000, INIT1, INIT2,0DT, 1 PTCH,LA30S/0 
#ABSPAT=INIT330572:177460 


#/E 

wExX<er> 

#+C Exit from EDIT with 
»KI<cr> CONTROL/C and KI 

$BATCH SYSGN2<c¢r2 Restart batch generation 
$JOB SYSGN2(1,1) These messages appear 
TIMEs-12:13:53 as batch restarts. 


Normal procedures apply from here on. Batch wlll print 
further instructions about mounting tapes or disks as required. 


SOFTWARE PRODUCT VERSION 
RSTS/E SYSGEN VO6A-02 
COMPONENT VERSION 
SYSGEN PATCHES N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION SEQUENCE PAGE 
OF 
RF11l System Disk Lele 2 2 
NEW REPLACEMENT ARTICLE ORIGINAL DATE 
[_] 
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RSTS/E Software Dispatch 
June 1976 


RUNNING WITH NO SWITCH REGISTER OR DISPLAY LIGHTS 


PROBLEM: Some new PDP-11 processors, such as the 11/34, do not 
have a console switch register or display lights. If ae éRSTS/E 
VO6A-02 system is brought up on such a machine, it will 
immediately fail when it attempts to access the switch register 
and display light location (777570). 


DISPOSITION: The following modification to the SYSGEN procedure 
corrects the problem. When the SYSGEN dialogue is complete, the 
following message appears on the console terminal: 


SYSGEN: IF YOU HAVE ANY SPECIAL REQUIREMENTS WHICH REQUIRE 
SYSGEN: EDITING EITHER THE CONFIGURATION FILE (CONFIG.MAC) 
SYSGEN:OR THE BATCH GENERATION FILE (SYSGEN.BAT), ABORT 
SYSGEN:NOW BY TYPING "CONTROL/C" AND THEN "TE". RESUME AT 
SYSGEN: THIS POINT BY TYPING "BATCH SYSGN2". OTHERWISE, 
SYSGEN: TYPE "CO" TO CONTINUE WITH SYSTEM GENERATION 


A050 900000 
$ 


At this point, interrupt the batch stream by typing "CONTROL/C" 
and then "TE"<CR>. Then type the following commands to edit the 
configuration file (the symbol "<CR>" denotes typing the carriage 
return key and "<LF>" denotes typing the line feed key). The 
computer responses are underlined: 


DOS/BATCH V9~20C 


$R EDIT<CR> 
EDIT~11 V07~03 


#CONFIG.MAC_CONFIG.MAC<CR> 
*HSMULTTY;AI<CR> 

SWR$R=0<CR> 

SWR$W=0<CR> 

<LF> 

¥EX<CR> 

atc (TYPE "CONTROL/C") 

iKI<CR> 

SBATCH SYSGN2<CR> (TO RESUME THE SYSGEN PROCESS) 


Notes: 


1) With the switch register disabled the crash dump and 
auto~restart will always occur (i.e. as if the switch 
register were 177777). 

2) STATS (if configured in) will be constantly kept. 
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Magtape Labelling Default 


When creating a new VO06A-02 system, the MAGTAPE 
LABELLING DEFAULT question Its asked during execution 
of the DEFAULT option of the Initialization Code. 
Either DOS or ANSI is an acceptable answer with no 
preference given In the manuals. Since the System 
Library magtape is written In DOS format, the normal 
library bulld procedures will not work correctly If 
ANSI labelling Is selected. Furthermore, the ASSIGN 
MTn:.DOS command cannot be used to establish a_ label 
default under timesharing (i.e., prior to running 
BUILD) stnce the assignment would restrict use of the 
mMagtape drive to one job and two different jobs are 
used during the library build process. The BUILD 
program itself its a job which detaches and logs ina 
second job to execute commands from the build control 
files. The magtape drive cannot be assigned to either 
ee since both require use of the drive at different 
times. 


The only way around this problem Is to specify DOS 
labelling when the system is brought up for the first 
time. The library build procedures will then work as 
intended. The labelling default can be changed to 
ANSI at a later time by executing the DEFAULT option 
of the Initialization Code. 
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Magtape Labelling Default page 2 of 2 


A similar problem can occur when trying to OLD a 
program from a tape created by BACKUP. The BACKUP 
utility always writes DOS labelled tapes regardless of 
the system magtape labelling default (i.e., BACKUP 
creates DOS labels and writes the tape non. 


file-structured). If ANS! Is the system labelling 
default, an OLD from a tape created by BACKUP will not 
work, In this case, however, the ASSIGN MTn:.DOS 


command prior to doing the OLD will eliminate’ the 
problem. 


SOFTWARE DISPATCH 2 


August 1975 


OVERLAPPED SEEK DRIVER FOR RP11-C/RPO3 DISK SUBSYSTEM 


The RP11-C controller allows several RP03 drivers to perform seek 
operations simultaneously. On systems with more than one RPO3 
drive, the standard RSTS/E VO6A-02 software automatically includes 
an overlapped seek driver unless the non-overlapped driver is 
explicitly selected. This procedure is described in the RSTS/E 


System Generation Manual. 


CAUTION 


A hardware ECO to the RP11-C controller 
must be installed for the overlapped 
seek driver to operate properly. The 
specific ECO is RP11C ECO #0008A. The 
RSTS/E system hangs if this ECO is not 
installed. 
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CD11 UNIBUS ADDRESS 


The standard UNIBUS address for the CDll high speed card reader ~ 
(1000 CPM or 1200 CPM) has been changed by CD11 ECO #13. The pre-ECO 
address was 172460. The new address is 177160, which is the same 

bus address used for the CRl1l card reader. The CD11 interrupt vector 
at 230 is not affected by the ECO. The interrupt vector for the CD1ll 
has always been the same as the vector assigned to the CRl1l. The 
address change was necessary due to a conflict between CD11 and 
RH11/TM02/TU16 address assignments. Note that it is not possible 

to operate the TJU16 magtape subsystem and the CD1l card reader on 
the same system until the CDll ECO has been installed. 


RSTS/E VO6A-02 assumes the new UNIBUS address for the CDll. However, 
since the ECO is recent and may not be installed on all CDll's in 
the field, RSTS/E does provide for operation of the CDll at the pre- 
ECO address (provided the system does not include any TU16 tape 
drives). To operate the CDll at the pre-ECO address, the SYSGEN 
card reader query must be answered with an address modifier as 

shown below: 


CARD READER? CD/A:172460 


The SYSGEN automatic answer facility will determine whether the CD11 
is configured for the pre-ECO address or the new address. The 
automatic answer for the pre-ECO address will appear as follows: 


CARD READER? **CD/A:172460** 


This automatic answer should be accepted with the <line feed> response 
if the ECO cannot be installed immediately and no TU16's are included 
in the hardware configuration. A new system generation will be re- 
quired to make the address change after the ECO is installed, however. 
No address modifier will appear in the auto-answer if the CDll is 
configured for the new address (i.e., the ECO has been installed). 

The standard response to the card reader question is used to configure 
the RSTS/E system for the new CD11 address as shown below: 


CARD READER? CD 


CARD READER? **kCD** <line feed> 
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GENERATING RSTS/E VO6A-02 FOR A PDP-11 WITH RPO5 DISKS 


PROBLEM: RSTS/E VO6A-02 does not recognize the RPO5 disk drive type 
in the RH11 controller. If a RSTS/E VO6A-02 system is brought up on a 
machine with one or more RPO5 disks, it will handle them erroneously. 
The following modification to the SYSGEN procedure corrects the 
problem. 


DISPOSITION: When the SYSGEN dialogue is complete, the following 
message appears on the console terminal: 


SYSGEN:IF YOU HAVE ANY SPECIAL REQUIREMENTS WHICH REQUIRE 
SYSGEN: EDITING EITHER THE CONFIGURATION FILE (CONFIG.MAC) 
SYSGEN:OR THE BATCH GENERATION FILE (SYSGEN.BAT), ABORT 
SYSGEN: NOW BY TYPING “CONTROL/C" AND THEN "TE". RESUME AT 
SYSGEN: THIS POINT BY TYPING "BATCH SYSGN2". OTHERWISE, 
SYSGEN: TYPE "CO" TO CONTINUE WITH SYSTEM GENERATION 


A050 000000 
$ 


At this point, interrupt the batch stream by typing CONTROL/C and 
then TE, Then type the following commands to edit the batch file 
(the symbol <CR> denotes typing the carriage return key, <LFD> 

denotes typing the line feed key; the computer responses are 
underlined): 


gR EDIT<CR> 
EDIT=-11__V07-03 


#SYSGEN. BAT<SYSGEN.BAT<CR> 

#H;INIT/SQ;G3/E;-1C;0;A1<CR> 

# ABSPAT=INIT:57630: 10446:42716:4001: 22627: 20020: 207<CR> 

#ABSPAT=INIT: 30160:4737:57630: 1034: 32704: 4000: 1413<CR> 

#/E<CR> 

<LF> (DO NOT OMIT THE ‘#° IN THE PREVIOUS 3 LINES) 
*EX<CR> 

#tc (TYPE “CONTROL/C") 

KI<CR> 

$BATCH SYSGN2<CR> (TO RESUME THE SYSGEN PROCESS) 


RSTS/E SYSGEN vO6A-02 Seq 1.3.3* 
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Insufficient Contiguous Space System Generation 


PROBLEM: 


After several system generations using DECpack (RK disk) distribu- 
tion, there may be insufficient contiguous space on the disk 

for CILUS scratch files. When this occurs, the system generation 
batch stream will abort with an FQg6 message. The DK@:/FR command 
to PIP (under DOS) will print the number of free blocks available 
on the disk. This count is misleading since there may be insuf- 
ficient contiguous space even though the number of free (noncontig- 
uous) blocks is large. 


DISPOSITION: 


The best solution is to always make a ROLLIN copy of the distribution 
disk supplied by DIGITAL and use a new copy for each system generation. 
The system generation DECpack supplied by DIGITAL should never be used 
for a system generation and should never be WRITE ENABLED for any 


purpose. 


This will prevent inadvertent destruction of the installation 


master pack and will allow copies to be made as required. Alternatively, 
of course, the same copy can be used repeatedly until the problem 


appears. 


A new copy must then be made to perform the system generation. 
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STACK LIMIT WARNING MESSAGE = OPTIONAL INIT PATCH 


RSTS/E systems normally require a programmable Stack Limit 
Register. The Stack Limit provides hardware protection from 
KERNEL mode stack overflows. Although stack overflow should 
never occur, the Stack Limit does provide a level of protection 
from hardware malfunctions or software problems In the Monitor. 
The programmable Stack Limit Register is a standard feature on 
the PDP-11/70 and 11/45 processors and Is avallable as an option 
on the PDP-11/40. 


The Initialization Code in RSTS/E VO6A-02 will print a 
warning message If the Stack Limit Register Is not found at 
address 177774. The message Is printed each time the system disk 
Is bootstrapped. If the register is not present, the system will 
aa to set the stack limit and will run without’ the 
option. 


If the PDP-11 Is not equipped with the programmable Stack 
Limit Register, {tt may be annoying to see the warning message 
printed on each boot. The patch below Is provided to disable 
printing of the message. 


o 


1. This ts an optional patch to the RSTS/E VO6A-02 
Initialization Code. The patch disables printing of a 
warning message on machines which are not equipped with a 
programmable Stack Limit Register. No load map Is required 
to Install the patch. 
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August 1975 


Bootstrap the RSTS/E system disk normally to load the 
Initialization Code [nto memory. Then use the PATCH option 
of the INIT code to Install the patch as shown below. 


WARNING ** THIS MACHINE DOES NOT HAVE A STACK LIMIT REGISTER! 
ALTHOUGH NOT ADVISED, RSTS/E WILL RUN WITHOUT THE OPTION. 


OPTION: PATCH 

MODULE NAME ? INIT 

BASE ADDRESS ? 023446 

OFFSET ADDRESS ? 0 

MODULE BASE OFFSET OLD NEW? 

INIT 023446 000000 005015 ? 000000 

INIT 023446 000002 040527 ? tC CONTROL/C EXIT 


OPTION: BOOT BOOT recommended to 

BOOT DEVICE ? <lIne feed> verify that patch 
has been Installed 
correctly. 

RSTS/E VO6A-02 TEST SYSTEM 

(NO WARNING MESSAGE SHOULD BE PRINTED) 


OPTION: 
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RPO2 and/or RPO3 Errors Logged at Start of Timesharing 


PROBLEM: 


On RSTS/E systems configured for an RPO02 or RPO3 system 
disk and the RP overlapped Seek Driver (i.e., all systems 
with 2 or more drives unless the non-overlapped driver was 
explicitly requested during SYSGEN), an RP11/RP02/RP03 
error will be logged when the system is brought up for 
timesharing. 


The error is logged because the RP11/RPO02/RP03 attention 
lines are not cleared after the monitor and run time 
system are loaded by the INIT code. The effect is that an 
immediate attention interrupt occurs when RP11 interrupts 
are enabled for the first I/0 operation to/from the system 
disk under timesharing. The overlapped seek driver will 
(correctly) log an error and ignore the interrupt. 


This problem does not affect system operation, but the 
mysterious error logged at start up may cause unnecessary 
concern. The patch presented below will cause the INIT 
ecode to clear the attention bits prior to the start of 
normal timesharing. 


PROCEDURE: 


1. This is a patch to the Initialization Code. Although 
it will only affect systems with an RPO2 or RPO3 
system disk, it can be installed on all VO06A-02 
systems. A load map is not required to install the 
patch. 
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2. Bootstrap the RSTS/E system disk normally to load the 
Initialization Code into memory. Then use the PATCH 
option of the INIT code to install the patch as shown below: 


OPTION: PATCH 

MODULE NAME ? INIT 
BASE ADDRESS ? 22000 
OFFSET ADDRESS ? 10316 


MODULE BASE OFFSET OLD NEW ? 

INIT 022000 010316 000131 ? 005060 

INIT 022000 010320 000000 ? 177774 

INIT 022000 010322 000000 ? 005560 

INIT 022000 010324 000000 ? 177774 

INIT 022000 010326 000000 ? 000131 

INIT 022000 010330 000000 ? tc CONTROL/C 
Exit 

OPTION: BOOT BOOT required to load altered 


INIT code into memory. 
BOOT DEVICE ? <LF> Line Feed boots the system disk 
RSTS VO6A-02 TEST SYSTEM 


OPTION: 
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SWAP.SYS FILE PROBLEM 


In RSTS/E VO6A-02 systems there are four possible swap files called 
SWAPO.SYS, SWAP1.SYS, SWAP2.SYS, and SWAP3.SYS. In RSTS/E v05-21 
and all field test versions of VO5B (not VO5B-24 or V05C-01), only 
one file called SWAP.SYS could be created. 


The difference in swap file names presents a problem if a VQ6A-02 
system replaces an old system on a system disk which contains the 
V05-21 or early VO5B SWAP.SYS file (not V0O5C-01). If a swapping disk 
exists on the machine, the SWAP.SYS file would normally reside on 
that disk for efficient swapping. The retrieval information for 
SWAP.SYS would exist in the UFD for account [0,1] on the system disk, 
however. When the REFRESH initialization option sets up the Storage 
Allocation Tables (SAT) for the system and swapping disk(s), it has 
most or all of the swapping disk space allocated to the SWAP.SYS 
file. The REFRESH routines in VO6A-02 systems cannot delete this 

old swap file. Hence, there is no apparent way to free up the swapping 
disk space. 


Similarly, if the system does not include a swapping disk, the old 
SWAP.SYS file exists on the system disk. Since this file could be 
very large and can not be deleted, there is wasted space on the system 
disk. 


To solve the problem, move the old SWAP.SYS file to the system disk 

(if it resides on a swapping disk) using REFRESH under the old 

system before the old CIL is replaced. Reduce the size of the SWAP.SYS 
file to the absolute minimum of 32 blocks and thereby minimize wasted 
space on the system disk. The SWAP.SYS file remains on the system 

disk. After the old CIL is replaced with the V06A-02 system CIL, 

any space on a swapping disk previously occupied by SWAP.SYS is available 
for the VO6A-02 swapping files. 


This problem does not affect new VQ6A-02, VO5C-01, or VO5B-24 installations 
since the old SWAP.SYS file does not exist. The problem shows up if 


a VO6A-02 system replaces a V05-21 CIL on the system disk leaving the 
existing file structure intact. 
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Loss of Usable Space on Fixed Head Swapping Disks 


PROBLEM: 


When trying to utilize all of the space normally available on fixed 

head disks used as swapping devices, you will lose (pack cluster size) minus 
(device cluster size) blocks of usable space on your fixed head swapping 
disk if your system disk pack cluster size is greater than the system 

disk device cluster size. All disks have a device cluster size of one 
except RP@3s which have a device cluster size of two. Pack cluster size 

is established at DSKINT time. 
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REFRESHING A SYSTEM DISK AFTER REPLACING THE MONITOR CIL MAY CAUSE 
DOUBLY ALLOCATED BLOCKS 


PROBLEM: When a RSTS/E V06A-02 monitor CIL is used to replace an 
existing system CIL (as described in Section 2.9.2 of the System 
Generation Manual), attempts to REFRESH the system disk may generate 
the error message: 


CLEAN FOUND A DOUBLY ALLOCATED BLOCK 


This will occur if the new system is generated for fewer swapping 
disks than the old system. or for different types or sizes of swapping 
disks and if any of the swapping disks are in use by the old system 
at the time of the replacement. 


DISPOSITION: Before replacing the old monitor CIL with a V06A-02 mon- 
itor CIL, REFRESH the system disk using the old monitor to remove all 
uses of the old swapping disks: 


1. If SWAPO.SYS is on a swapping disk, change it to have a minimal 
size (32 blocks) on the system disk (SYS). 


2. If any other swap files are on SWP, delete them. 


3. If OVR.SYS or ERR.SYS is on SWP, move it into the CIL (answer the 
question CIL ? with YES). 


4. If BUFF.SYS is on SWP, move it to SYS. 


After this REFRESH, the File Status Table should show no files that 


exist on SWP. Now replace the monitor CIL. Once the new monitor is 


on the system disk, use REFRESH to move system files onto the new con- 
figuration of swapping disks, if any. 


RSTS/E EXECUTIVE V06A-02 Seq 2.2.3 
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Accounting Routines 


PROBLEM: 


Kilo Core Ticks are not always reset at the start of a new 
job. The problem occurs when a user who is already logged 
into the system logs into the same or another account with 
the HELLO P,PN command. The high order bits of the KCT 
counter in the Job Data Block are not cleared in this 
case. The new job will be overcharged if the high order 
bits of the KCT counter are non-zero. 


SOLUTION : 


The following patch will correct the problem. 


PROCEDURE: 

1. This is a pateh to the accounting routines in the 
Monitor. It should be installed on all RSTS/E VO6A-02 
systems. 


2. Obtain a listing of the RSTS load map. This map was 
printed during System Generation if a line printer was 
available at that time. Otherwise, the map must be 
printed from the LICIL tape created at System 
Generation time (DECtape or magtape distribution) or 
from the System Generation DECpack (RK distribution). 
If obtaining the map from tape media, print the file 
RSTS.MAP from the LICIL tape using PIP under’ RSTS/E, 
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Accounting Routines page 2 of 3 
the System Generation monitor, or any DOS monitor. If 


the media is DECpack, use Extended PIP with the /DOS 
switch to print the file RSTS.MAP from account [1,1] 
on the System Generation DECpack. Alternatively, 
bootstrap the System Generation DECpack, LOGIN under 
account [1,1], and use PIP under DOS to. print’ the 
file. 


3. On the first or second page of the RSTS map under the 
heading "Program Section Allocation Synopsis" find the 
section <PATCH> and record the first number to the 
right of the section name (first column of numbers). 


[PATCH] = 


4, On about the 12th page of the RSTS load map, find the 
heading “***TITLE: FIP IDENT:06A.02 FILE RSTS.OBJ". 
Sean down the left column for the section name <FIP> 
and locate the tag ALLTIM in the listing of global 
symbols. Record the number which appears immediately 
to the right of the tag ALLTIM. 


[ALLTIM] = 
5. Bootstrap the RSTS/E system disk normally to load the 


initialization code into memory. Then use the PATCH 
option of the INIT code to install the following patch: 


Accounting Routines 


OPTION: 


PATCH 


MODULE NAME? RSTS 
BASE ADDRESS? [ALLTIM] 
OFFSET ADDRESS? 104 


MODULE 
RSTS 
RSTS 
RSTS 


OPTION: 


BASE OFFSET 
[ALLTIM] 000104 
[ALLTIM] 000106 
[ALLTIM] 000110 


PATCH 


MODULE NAME? RSTS 
BASE ADDRESS? [PATCH] 
OFFSET ADDRESS? 0 


MODULE 
RSTS 
RSTS 
RSTS 
RSTS 
RSTS 
RSTS 


OPTION: 


BASE OFFSET 
[PATCH] 000000 
[PATCH] 000002 
[PATCH] 000004 
[PATCH] 000006 
[PATCH] 000010 
[PATCH] 000012 


OLD 

042715 
176000 
052625 


OLD 

000000 
000000 
000000 
000000 
000000 
000000 
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NEW? 


? 


? [PATCH] 


2 


004737 


4C 


NEW? 
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042715 
176000 
105061 
ITT TOT 
000207 
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CONTROL/C Exit 


CONTROL/C Exit 
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Correct Operation of FORTRAN-IV 


The FORTRAN-IV package will not run correctly due _ to 
the use of certain locations in the user’s job image 
by the monitor. The monitor saves the user’s context 
in the user’s job image in order to be able to swap 
out that user. The locations currently used by the 
monitor affect the correct operation of the FORTRAN-IV 
package. The patch presented here will correct the 
problem. 


PROCEDURE: 


1. This is a patch to the monitor. It should be 
installed on all RSTS/E VO06A-02 systems running 
the FORTRAN-IV package. 


2. Obtain a listing of the RSTS load map. This map 
was printed during System Generation if a line 
printer was available at that time. Otherwise, 
the map must be printed from the LICIL tape 
created at System Generation time (DECtape or 
mMagtape distribution) or from the System 
Generation DECpack (RK distribution). If 
obtaining the map from tape media, print the file 
RSTS.MAP from the LICIL tape using PIP under 
RSTS/E, the System Generation monitor, or any DOS 
monitor. If the media is DECpack, use Extended 
PIP under RSTS/E with the /DOS switch to print the 
file RSTS.MAP from account [1,1] on the System 
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Correct Operation of FORTRAN-IV 


Generation DECpack. Alternatively, bootstrap the 
System Generation DECpack, LOGIN under account 
[1,1], and use PIP under DOS to print the file. 


3. On the first or second page of the RSTS map under 


the heading "Program Section Allocation Synopsis" 
find the tag <PATCH> and record the first number 
to the right of the section name (first column of 
numbers). 


[PATCH] = 


Now find the section <MON> and record first number 
to the right of the section name (first column of 
numbers). 


{MON] = 
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Correct Operation of FORTRAN-IV 


pa Now find the sections <MONFSV> and <MONFRE> and 
record the first number to the right of the 
section name (first column of numbers). 


[MONFSV ] 


(MONFRE ] 


If the third number of the section <MONFSV> is 
000142 and the third number of the section 
<MONFRE> is 000070, then your system is configured 
for the PDP-11/45, PDP-11/70 hardware floating 
point unit. Note below if your system has the 
floating point unit: 


FLOATING POINT UNIT ? [Y or N] ------ 


6. Bootstrap the RSTS/E system disk normally to load 


the initialization code into memory. Then use the 
PATCH option of the INIT code to install the 
following patch. 


OPTION: PATCH 
MODULE? RSTS 
BASE ADDRESS? [MON] 
OFFSET ADDRESS? 1064 


MODULE BASE OFFSET OLD NEW? 
RSTS [MON] 001064 103011 ? 101011 
RSTS (MON] 001066 162716 ? ITC CONTROL/C Exit 
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OPTION: PATCH 
MODULE? RSTS 

BASE ADDRESS? [MON] 
OFFSET ADDRESS? 1072 


MODULE BASE OFFSET OLD NEW? 

RSTS [MON] 001072 031627 ? 004737 

RSTS [MON] 001074 177740 ? [PATCH]+74 

RSTS [MON] 001076 101424 ? 103424 

RSTS (MON] 001100 011601 ? TC CONTROL/C Exit 
OPTION: PATCH 

MODULE? RSTS 

BASE ADDRESS? [MON] 

OFFSET ADDRESS? 3604 

MODULE BASE OFFSET OLD NEW? 

RSTS [MON] 003604 140040 ? 140110 

RSTS [MON] 003606 012702 ? fC CONTROL/C Exit 
OPTION: PATCH 

MODULE? RSTS 

BASE ADDRESS? [MON] 

OFFSET ADDRESS? 3746 

MODULE BASE OFFSET OLD NEW? 

RSTS [MON] 003746 000040 ? 000110 

RSTS [MON] 003750 103010 ? TC CONTROL/C Exit 
OPTION: PATCH 

MODULE? RSTS 

BASE ADDRESS? [MON] 

OFFSET ADDRESS? 3774 

MODULE BASE OFFSET OLD NEW? 

RSTS [MON] 003774 000016 7? 000066 

RSTS [MON] 003776 012702 ? $C CONTROL/C Exit 


SOFTWARE PRODUCT VERSION 
RSTS/E EXECUTIVE VO6A-02 
COMPONENT VERSION 
MONITOR PATCHES N/A 
SUBPROGRAM OR ADDITIONAL INFORMATION SEQUENCE 
2.3.2* 


PAGE 
4OF ¢ 


NEW REPLACEMENT ARTICLE 


LJ 


ORIGINAL DATE 
February 1976 


54 


55 


Correct Operation of FORTRAN-IV 


OPTION: PATCH 
MODULE? RSTS 

BASE ADDRESS? [MON] 

OFFSET ADDRESS? 6206 

MODULE BASE OFFSET OLD 
RSTS [MON] 006206 000140 
RSTS [MON] 006240 103445 


OPTION: PATCH 

MODULE? RSTS 

BASE ADDRESS? [PATCH] 

OFFSET ADDRESS? 74 

MODULE BASE OFFSET OLD 


RSTS {PATCH] 000074 000000 
RSTS [PATCH] 000076 000000 
RSTS [PATCH] 000100 000000 
RSTS [PATCH] 000102 000000 
RSTS (PATCH] 000104 000000 
RSTS [PATCH] 000106 000000 
OPTION: 


6A. If your system has the 
floating point unit also do 


OPTION: PATCH 

MODULE? RSTS 

BASE ADDRESS? [MONFSV] 

OFFSET ADDRESS? 10 

MODULE BASE OFFSET OLD 
RSTS [MONFSV] 000010 440016 
RSTS {[MONFSV] 000012 032777 


SOFTWARE PRODUCT 
RSTS/E EXECUTIVE 
COMPONENT 

MONITOR PATCHES N/A 

SUBPROGRAM OR ADDITIONAL INFORMATION SEQUENCE 
2.3.2* 
NEW REPLACEMENT ARTICLE ORIGINAL DATE 
[x] [_] February 1976 


RSTS/E Software Dispatch 
February 1976 


NEW? 
? 000170 


? fC CONTROL/C Exit 


NEW? 
103403 

026627 

000002 

000110 

000207 

fC CONTROL/C Exit 


ba a ie i a ee) 


PDP-31/45, PDP-11/70 
the following: 


NEW? 
2? 140066 
? TC CONTROL/C Exit 


VERSION 
VO6A-02 
VERSION 


PAGE 
5 OF ¢ 


hardware 


RSTS/E Software Dispatch 
February 1976 


Correct Operation of FORTRAN-IV 


OPTION: PATCH 

MODULE? RSTS 

BASE ADDRESS? [MONFSV] 

OFFSET ADDRESS? 24 

MODULE BASE OFFSET OLD NEW? 

RSTS [MONFSV] 000024 000140 7? 000170 

RSTS (MONFSV] 000026 103030 ? TC CONTROL/C Exit 


OPTION: PATCH 

MODULE? RSTS 

BASE ADDRESS? [MONFSV] 

OFFSET ADDRESS? 60 

MODULE BASE OFFSET OLD NEW? 

RSTS [MONFSV] 000060 140060 ? 140110 

RSTS [MONFSV] 000062 174022 ? TC CONTROL/C Exit 


OPTION: PATCH 

MODULE? RSTS 

BASE ADDRESS? [MONFRE] 

OFFSET ADDRESS? 26 

MODULE BASE OFFSET OLD NEW? 

RSTS ([MONFRE] 000026 1401940 ? 440170 

RSTS ([MONFRE] 000030 1372545 ? TC CONTROL/C Exit 


OPTION: PATCH 

MODULE? RSTS 

BASE ADDRESS? [MONFRE] 

OFFSET ADDRESS? 52 

MODULE BASE OFFSET OLD NEW? 

RSTS (MONFRE] 000052 140016 ? 140066 

RSTS ([MONFRE] 000054 170145 ? TC CONTROL/C Exit 


OPTION: 


SOFTWARE PRODUCT VERSION 
RSTS/E EXECUTIVE VO6A-02 
COMPONENT VERSION 

MONITOR PATCHES N/A 
SUBPROGRAM OR ADDITIONAL INFORMATION SEQUENCE PAGE 
2.3.2* 6 OF ¢ 

NEW REPLACEMENT ARTICLE ORIGINAL DATE 

[x ] [ February 1976 
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SOFTWARE DISPATCH rsts/ 


Pre-1973 


REPLACE Commands 


PROBLEM: 


Because the REPLACE command requires the allocation of user buffer 
space to execute the command, it is possible to get a MAX CORE EX- 
CEEDED indication when executing this function. 


ALTERNATE SOLUTION: 


The program code can be efficiently reorganized by doing the following: 


CLOSE I% FOR 1% = 1% to 12% 
SAVE PROG 
OLD PROG 


Another possibility is to add a STOP as the first program statement 
and RUN the program. This forces garbage collection and frees up 
space. The STOP can then be removed and there will be suf- 

ficient buffer space to perform the REPLACE. 


| SOFTWARE PRODUCT j VERSION 
RSTS/E Executive | VA6A-G2 
COMPONENT t VERSION 
MONITOR Notes j 
SUBPAOGRAM OR ADL:TIONEL aNFORMATION | SELUGND. ¢ ie PAGE 


i 

| 

! 

| ae 
if 


MONITOR Commands 
fe ae a eee Mee ——— 
j NEW EPLACEMENT ARTICLE ORIGINAL DATE j 

lx 
co ee oe | ae 


SOFTWARE DISPATCH 


July 1973 


COMPILE Command 


PROBLEM: 

COMPILEing a program with a protection code that write-protects 

it does not work. 

SOLUTION: 

The file gets created, write-protected, and when it is to be saved 


in compiled form, the PROTECTION VIOLATION occurs. To accomplish 
what is desired, COMPILE first, then NAME-AS to change protection. 


MONITOR Notes 


SUBPROGRAM OR ADDITIONAL INFORMATION 
MONITOR Commands 


SEQUENCE # 
2.4.2 


NEW REPLACEMENT ARTICLE 


Lx] 


SOFTWARE PRODUCT VERSION 
RSTS/E Executive VG6A-G2 


COMPONENT VERSION 


ORIGINAL DATE 
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SOFTWARE DISPATCH — 


January 1974 


Deletion of WRITE-PROTECTED Files 


PROBLEM: 


A file which is WRITE-PROTECTED cannot be deleted. 


SOLUTION: 


WRITE-PROTECTED specifically prevents deletion of a file by users 
against whom the protection applies. For example, a file 
WRITE-PROTECTED against the owner cannot be deleted by the owner. 
This serves to prevent accidental deletion. 


To delete such files, the protection must first be changed using 
PIP or the NAME...AS construct. Privileged users can always 
delete files regardless of the WRITE-PROTECTION. 


SOFTWARE PRODUCT VERSION 


RSTS/E Executive VG6A- 
COMPONENT “a VERSIO 


MONITOR Notes 


SUBPROGRAM OR ACDITIONAL INFORMATION SEQUENCE # { 


December 
i 


G2 


N 


| 2.4.3 & RA a 


REPLACEMENT ARTICLE | ORIGINAL DATE 


1973 


SOFTWARE DISPATCH = 


January 1974 


PROTECTION VIOLATION When SAVEing Files 


PROBLEM: 


SAVE <42> results in PROTECTION VIOLATION. 


SOLUTION: 


When a program is SAVEd, the file is created (with specified protection 
code) before the text is written into the file. For this reason 

SAVE <42> first creates the file WRITE-PROTECTED against the owner; 
therefore, the text cannot be written into the file. If protection 
against the owner is desired, the file can be SAVEd with standard 
protection <6f> and later changed using PIP or the "NAME...AS" con- 
struct. 


SOFTWARE PRODUCT | VERSION | 

RSTS/E Executive } VG6A-G2 

COMPONENT VERSION i 
MONITOR Notes 


SUBPROGRAM OR ACDITIONAL INFORMATION 
PROTECTION CODES 


SEQUENCE # | PAGE i 
1 OF WL 


ORIGINAL DATE 
December 1973 


REPLACEMENT ARTICLE 
1 


SOFTWARE DISPATCH sr 


Protection Code of <$> Cannot Be Written 


PROBLEM: 


A file with a protection code of <g> cannot be written on by a 
nonprivileged user. 


SOLUTION: 


It is possible to delete, extend, or write into an existing file 
across accounts (even 'nonprivileged) if the protection code of 
the file permits. It is not possible, however, to create a file 
across accounts. Of course, privileged users and programs can 
perform any of the operations. 


Running without privileges, the following case is noted. The file 
NOTICE.ALL had a protection code of <@>. An unsuccessful attempt 
was made with PIP to modify the file from another account as 
shown: 


PIP NOTICE.ALL[2,10@]<KB: 
NOTICE.ALL[2,19@]- PROTECTION VIOLATION 


This command string to PIP will try to create the file NOTICE.ALL 
in account [2,10%]. There is a check in the CREATE routines which 
determines if the file can be created. Since the file creation can- 
not occur, the operation fails before the current file is deleted. 
File deletion would otherwise be legal since the protection code of 
<%> permits deletion by anyone. 


If the PIP UPDATE (/UP) switch is used, the file is modified in 
Place with no creation or deletion. The following example demonstrates 
this. 


SOFTWARE PRODUCT 
RSTS/E Executive 
COMPONENT 
MONITOR Notes 


VERSION 
V£EA-G2 


VERSION 


SEQUENCE PAGE 
2.4.5 | 1 OF 2 
ace 


SUBPROGRAM OR ADDITIONAL INFORMATION 


REPLACEMENT ARTICLE 


SOFTWARE DISPATCH 


April 1975 


Protection Code of <@> Cannot Be Written 


NOTICE. ALLOS. tha) - PROTESTION WidLaATias 


MOTICE. ALL - CANT FIND FILE OR AOCCHINT 


RELLO 
HELL 
HELLS 
HELLO 
THIS IS A OUMMNY 
THIS IS A GuMeay 
THIS ITS A Olina 


READY 


THIS If THE 5 
ATSTHNTHIS 15 
THIS IS THE 5 

<Z 
READY 


PIP MOTIVSYSCE, ALLE 2. Lat] 


THIS IS THE SECOND PART OF THE TEaT 
THIS IS THE SECOND SART OF THE TERT 
THIS I5 THE SECUMG PART OF THe TEXT 


SOFTWARE PRODUCT 
RSTS/E Executive 


VERSION 
VG6A-G2 
aa 


SEQUENCE PAGE 


COMPONENT 
MONITOR Notes 


SUBPROGRAM OR ADDITIONAL INFORMATION 


REPLACEMENT ARTICLE ORIGINAL DATE 


RSTS/E Software Dispatch 
December 1975 


Error in 2741 Call 360 BASIC Code Conversion Table 
aoa ee SE eS OY Bae tt Loae conversion Table 


PROBLEM: 


The 2741 Conversion Table for Call 360 BASIC code contains two 
errors which cause incorrect ASCII conversion of the + (upper 
case P) and < (upper case 3) symbols. On input the Call 360 
terminal + is incorrectly translated to I and < is incorrectly 
translated to M. These errors are corrected by the patch 
presented below. 


SOLUTION: 


PREREQUISITES : 


1. This patch should be installed on all V@6A-92 systems which 
are configured for 2741 terminals with Call 360 BASIC code. 


2. Obtain a listing of the RSTS load map. This map was printed 
during System Generation, if a line printer was available at 
that time. Otherwise, the map must be printed from the LICIL 
tape created at System Generation time (DECtape or magtape 
distribution) or from the System Generation DECpack (RK dis- 
tribution). If obtaining the map from tape media, print the 
file RSTS.MAP from the LICIL tape using PIP under RSTS/E, the 
System Generation monitor, or any DOS monitor. If the media 
is DECpack, use extended PIP under RSTS/E with the /DOS switch to 
print the file RSTS.MAP from account [1,1] on the System Generation 
DECpack or bootstrap the System Generation DECpack, LOGIN under 
account [1,1], and use PIP under DOS to print the file. 


3. On the first or second page of the RSTS map under the heading 
"Program Section Allocation Synopsis," find the tag (TB2741) 


SOFTWARE PRODUCT 
RSTS/E EXECUTIVE 
COMPONENT 
TERMINAL SERVICE PATCHES 


VERSION 
VO6A-02 
VERSION 
N/A 
SEQUENCE PAGE 
2.5.1* | 1 OF 3 


ORIGINAL DATE 
October 1975 


SUBPROGRAM OR ADDITIONAL INFORMATION 
2741 TERMINAL: CALL 360 BASIC CODE 


NEW REPLACEMENT ARTICLE 


Ed 
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December 1975 


Error in 2741 Call 360 BASIC Code Conversion Table 


5A. 


SOFTWARE PRODUCT VERSION 

RSTS/E EXECUTIVE VO6A-02 

COMPONENT VERSION 
TERMINAL SERVICE PATCHES N/A 


and record the first number to the right of the section name 
(first column of numbers). 


(TB2741) = 


The position of the Call 36% Conversion Table relative to 

address (TB2741) depends on the number of 2741 codes supported 
and the order in which the various codes were specified at 

System Generation time. To make the patch apply to all sys- 

tems, the four offsets 0, 400, 1000, and 1400 are tested in 

5A (which follows below) to determine the BASE ADDRESS of the Call 
360 Table. The OLD contents of the word at (TB2741)+N (where 

n=0, 400, 1000, or 1400) must be 000040 for the Call 360 Table. 


Bootstrap the RSTS/E system disk normally to load the initi- 
alization code into memory, then use the PATCH option of the 
INIT code to install the patch as shown below. If more than 
one 2741 code is supported, perform the search for the Call 
360 Table shown in 5A. If only Call 360 Basic Code is sup- 
ported on the 2741 terminals, skip the search in 5A and use 
(TB2741)+0 for the BASE ADDRESS in 5B and 5C below. 


OPTION: PATCH 
MODULE NAME? RSTS 
BASE ADDRESS? (1TB2741) 


OFFSET ADDRESS? N Where N=0, 400, 1000, or 1400 
MODULE BASE OFFSET OLD NEW? 

RSTS (TB2741) N oo00k0 ?C CONTROL/C EXIT 
If the OLD contents Is not equal to 000040 repeat SA for 


the next N. If OLD=000040 use the current value for N In 5B 
and 5C below. 


SUBPROGRAM OR ADDITIONAL INFORMATION SEQUENCE 
2741 TERMINAL: CALL 360 BASIC CODE | 2-5.1* 


NEW REPLACEMENT ARTICLE ORIGINAL DATE 
[ October 1975 


PAGE 
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64 


RSTS/E Software Dispatch 
December 1975 


Error in 2741 Call 360 BASIC Code Conversion Table 


5B. OPTION: PATCH 
MODULE NAME? RSTS 


BASE ADDRESS? (TB2741)4N (N from Part 5A above) 

OFFSET ADDRESS? 12 

MODULE BASE OFFSET OLD NEW? 

RSTS (TB2741)4N 000012 O48400 27057000 

RSTS (TB2741)4N ooo0o01s 000000 ?C CONTROL/C: EXIT 


5C. OPTION: PATCH 
MODULE NAME? RSTS 


BASE ADDRESS? (TB2741)4N (N from Part 5A above) 

MODULE BASE OFFSET OLD NEW? 

RSTS (TB2741)4N 000060 037515 ?037474 

RSTS (TB2741)+N 000062 057800 7? C CONTROL/C EXIT 
OPTION: 


SOFTWARE PRODUCT VERSION 

TERMINAL SERVICE PATCHES N/A 
SUBPROGRAM OR ADDITIONAL INFORMATION SEQUENCE 
2741 TERMINAL: CALL 360 BASIC CODE 2.5.1* 


NEW REPLACEMENT ARTICLE ORIGINAL DATE 
[| October 1975 


PAGE 
3 OF 3 
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RSTS/E Software Dispatch 
January 1976 


Random Terminal Output on DH1l1l Lines 


PROBLEM: 


When a CTRL/C or CTRL/O is typed on a terminal connected to a 
DH11 multiplexer line, random printout will occasionally occur. 
The method used to abort DH11 output allows a race condition 
which can result in transmission of a large number of 
characters from random memory locations, The problem is 
corrected by the patch presented below. 


PROCEDURE : 


1, This is a patch to the terminal service. It should be 
installed on all RSTS/E V6A-02 systems configured for DH11 
multiplexers. 


2. Obtain a listing of the RSTS load map. This map is printed 
during system generation if a line printer is available. 
Otherwise the map must be printed from the LICIL tape 
created during SYSGEN (DECtape or magtape distribution) or 
from the System Generation DECpack (RK distribution). If 
the distribution medium is DECtape or magtape, print the 
file RSTS.MAP from the LICIL tape using PIP under RSTS, the 
system generation monitor, or any DOS monitor. If the 
distribution medium is DECpack, use extended PIP under 
RSTS/E with the /DOS switch to print the file RSTS.MAP from 
account [1,1] on the System Generation DECpack or bootstrap 
the System Generation DECpack, LOGIN under account {1,1], 
and use PIP under DOS to print the file. 


3. On the first page of the RSTS map under the heading 
"Program Section Allocation Sysnopsis" find the sections 
<PATCH> and <TTY>. Record the first number to the right of 
each section name (first column of numbers). 


SOFTWARE PRODUCT VERSION 
RSTS/E Executive VOGA-02 
COMPONENT VERSION 
Terminal Service Patches N/A 
SUBPROGRAM OR ADDITIONAL INFORMATION SEQUENCE PAGE 
2.5.2 he ee 
NEW REPLACEMENT ARTICLE ORIGINAL DATE 
fi December 1975 
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January 1976 


Random Terminal Output on DHil Lines 


[PATCH] 


Ere 


The SCANER utility described in Software Dispatch Article 
No.2.5.3 is used to find the patch location in the terminal 
service code. SCANER is run under normal timesharing with 
the parameters shown below. 


RUN $SCANER 


BASE ADDRESS ? [TTY] From 3 above 
LIMIT ADDRESS ? <return> Default limit is 160000 


ENTER WORDS TO MATCH ~ TERMINATE WITH “END 


OFFSET WORD 000000 CONTENTS ? 5063 
OFFSET WORD 000002 CONTENTS ? 10 
OFFSET WORD 000004 CONTENTS ? 5063 
OFFSET WORD 000006 CONTENTS ? 10 
OFFSET WORD 000010 CONTENTS ? 4567 
OFFSET WORD 000012 CONTENTS ? END 


PATTERN FOUND : BASE ADDRESS = [XXXXXX] 


SOFTWARE PRODUCT VERSION 
RSTS/E Executive VO6A-02 
COMPONENT VERSION 
Terminal Service Patches N/A 


NEW REPLACEMENT ARTICLE 
LJ 


Whenever convenient, take the system down and reboot the 
RSTS/E system disk normally to load the Initialization Code 
into memory, Then use the PATCH option of the INIT code to 
install the following patch. 


SUBPROGRAM OR ADDITIONAL INFORMATION SEQUENCE PAGE 
2.5.2*| 2 OF 3 


ORIGINAL DATE 
December 1975 
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Random Terminal Output on DH1l1 Lines 


OPTION: PATCH 

MODULE NAME ? RSTS 

BASE ADDRESS ? [XXXXXX] 
OFFSET ADDRESS ? 0 


MODULE BASE OFFSET 
RSTS [XXXXXX] 000000 
RSTS [XXXXXX] 000002 
RSTS [XXXXXX] 000004 
OPTION: PATCH 


MODULE NAME ? RSTS 
BASE ADDRESS ? [PATCH] 
OFFSET ADDRESS ? 52 


MODULE BASE OFFSET 
RSTS [PATCH] 000052 
RSTS [PATCH] 000054 
RSTS [PATCH] 000056 
RSTS [PATCH] 000060 
RSTS [PATCH] 000062 
RSTS [PATCH] 000064 
RSTS [PATCH] 000066 
RSTS [PATCH] 000070 
RSTS [PATCH] 000072 
RSTS [PATCH] 000074 
OPTION: 
SOFTWARE PRODUCT 


COMPONENT 


NEW R 


RSTS/E Executive 


Terminal Service Patches 


SUBPROGRAM OR ADDITIONAL INFORMATION 


EPLACEMENT ARTICLE 


From 4 above 


OLD NEW ? 

005063 ? 004737 
000010 ? [PATCH]+52 
005063 ? tC 


From 3 above 


Octal Addition 
CONTROL/C Exit 


OLD NEW ? 
000000 ? 011346 
000000 ? 042716 
000000 ? 177760 
000000 ? 012704 
000000 ? 000001 
000000 ? 072426 
000000 ? 040463 
000000 ? 000012 
000000 ? 000207 
ooo000 ? fc CONTROL/C Exit 


SEQUENCE 
2.5.2* 


VERSION 
VO6A-02 


VERSION 
N/A 


PAGE 
3 OF 3 


ORIGINAL DATE 
December 1975 
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SCANER Utility For Finding Patch Locations 


PROBLEM: 


For most RSTS/E system patches there is a global symbol or CSECT 
name which can serve as a base address for finding the patch 
location. All CSECT names and global symbols and their 
corresponding physical addresses can be found in the appropriate 
system load map. The location to be patched can then be 
specified as some fixed offset from this base. 


This general procedure is not always possible when trying to 
patch the Terminal Service (TTY) since this module is assembled 
during system generation and is different for each system. We 
neglected to sprinkle global symbols inside of conditional 
assembly directives to serve as convenient reference points. The 
SCANER utility listed below will be used in the future to find 
sections of code whenever the standard procedures do not suffice. 
It is used under normal timesharing to search for a sequence of 
instruction at, or near, the location to be patched. 


The program should be entered (from a _ privileged account), 
verified for accuracy, and compiled into the library with a 
protection code of <232>. The example which follows the program 
listing demonstrates the use of the program and serves to verify 
correct operations. 


SOLUTION: 

NEW SCANER 

READY 

18 DIM W2( 106%) 

26 M1$="ILLEGAL OCTAL NUMBER" 

30 M2$="ILLEGAL OCTAL ADDRESS" 

188 PRINT: INPUT "BASE ADDRESS ";B$: B%=FNO4(B$) 
110 IF E% THEN PRINT M1$: GOTO 180 

126 IF 0% THEN PRINT M2$: GOTO 196 

138 B1%=B% 

208 INPUT "LIMIT ADDRESS ";L$: L&=FNO%(L$) 

218 IF E% THEN PRINT M1$: GOTO 296 

226 IF 0% THEN PRINT M2$: GOTO 200 

230 IF L#=0% THEN LS=FNO%("1699g00") 

249 L=(L2 AND 32767%) : IF L4<@% THEN L=L+32768., 


SOFTWARE PRODUCT 
RSTS/E Executive 


COMPONENT 
Terminal Service Patches 


VERSION 

V6A-02 

VERSION 
N/A 


SEQUENCE 
2.5.3* 


ORIGINAL DATE 
December 1975 


PAGE 
1 OF3 


SUBPROGRAM OR ADDITIONAL INFORMATION 
SCANER. 


NEW ; REPLACEMENT ARTICLE 
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SCANER Utility for Finding Patch Locations 


3608 PRINT: PRINT “ENTER 
PRINT 
3108 FOR I1%=8% TO 66% ST 
320 PRINT “OFFSET WORD 
338 IF CVT$$(W$,-1%)="E 
348 IF E% THEN PRINT M1 
358 NEXT I%: PRINT "TOO 
490 NZ=1%-2%: ON ERROR 


WORDS TO MATCH - TERMINATE WITH “END “": 


EP 2% 

"sFNO$(I%)3;" CONTENTS ";: INPUT W$ 

ND" THEN 480 ELSE W%(1%)=FNOZ(W$) 

$: GOTO 328 

MANY WORDS TO MATCH - TRY AGAIN": GOTO 306 
GOTO 90698 


416 FOR 1%=20% TO N% STEP 2% 
428 N&Z=BSZ4+1%: M=(M% AND 32767%) : IF M%<O% THEN M=M+32768. 
436 IF M>L THEN 9610 
44g IF W%(1%)<>PEEK(M%) THEN B%=B%+2%: GOTO 418 
450 NEXT I% 
500 PRINT: PRINT "PATTERN FOUND : BASE ADDRESS = ";FNO$(B) 
510 GOTO 9999 
4QOD DEF FNOS(X$) ! CONVERT “STRING OCTAL" TO DECIMAL 
4010 X%,E%,0%=0% : X$=CVT$$(X$,173%) : IF X$="" THEN 4116 
4220 X1Z=LEN(X$) : IF X1%>6% THEN 4186 
4230 IF X1%<6% THEN 4668 
Agug IF LEFT(X$,1%)="@6" THEN 4656 ELSE 
IF LEFT(X$,1%)<>"1" THEN 4168 ELSE X%=327674%+1% 
4658 X$=sRIGHT(X$,2%): X1%=5% 
4968 FOR X9%=1% TO X1% 
4O7B X2GZ=ASCII(MID(X$,X1$4+1%+X9%,1%))-ASCII("S") 
4286 IF X2% AND -~8% THEN 4100 ELSE X4=X4+X2%"(8%#*(X9%-1%)) 
4O9G NEXT X9%: GOTO 4118 
4126 E¢=1% 
4118 FNO$=X% : O%=X% AND 1% : FNEND 
5208 DEF FNO$(X%) ! CONVERT DECIMAL TO "STRING OCTAL" 
5018 X$e"O" : IF X$<O% THEN X$="1" : X%=X% AND 32767% 
5020 X$=X$ + CHR$(((X% AND 28672%)/4096%)+482) 
+ CHR$(((X% AND 35844%)/ 5124)+484%) 
+ CHR$(((X% AND WUBS)/ = 64%4)+484) 
+ CHR$(((X% AND 564)/ 8%) +484) 
+ CHR$(( X% AND 7h) +484) 
5630 FNO$=X$ : FNEND 
9208 RESUME 9818 
9816 PRINT 
9820 PRINT "PATTERN NOT FOUND IN RANGE ";FNO$(B1%);" TO ";FNO$(L4) 
9999 END 
COMPILE $ 
READY 


NAME "$SCANER.BAC" AS "$SCANER.BAC<232>" 


READY 


SOFTWARE PRODUCT VERSION 
RSTS/E Executive VO6A-02 
COMPONENT 


Terminal Service Patches 


SUBPROGRAM OR ADDITIONAL INFORMATION 
SCANER 


NEW REPLACEMENT ARTICLE 


VERSION 
N/A 


SEQUENCE PAGE 
2.5.3% | 2 OF 3 


ORIGINAL DATE 
December 1975 


70 


71 


RSTS/E Software Dispatch 
December 1975 
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1. 


To verify correct operation, locate a copy of the RSTS load 
map for your installation. On the first or second page of 
the map under the heading "Program Section Allocation 
Synopsis" find the section names <MON> and <FIP> and record 
the first number to the right of the section names. 


[MON] 


[FIP] 


Run the scanner with the input parameters shown. The numbers 
will work for V@6A-62 and V@5C-@1. 


RUN $SCANER 


BASE ADDRESS ? [MON] From 1 above 

LIMIT ADDRESS ? <return> Default limit is 168828 
ENTER WORDS TO MATCH - TERMINATE WITH “END” 

OFFSET WORD $868868 CONTENTS ? 1861 

OFFSET WORD 28862 CONTENTS ? 4864 

OFFSET WORD 2880804 CONTENTS ? 280626 

OFFSET WORD 9808086 CONTENTS ? 186188 

OFFSET WORD 686208060 CONTENTS ? END 


PATTERN FOUND : BASE ADDRESS = XXXXXX = [FIP] 


READY 


If the program has been entered correctly, the value XXXXXX 
printed by SCANER will equal the address shown for [FIP] in 
the load map. 


SOFTWARE PRODUCT VERSION 
COMPONENT VERSION 
Terminal Service Patches N/A 


SEQUENCE PAGE 
o.5.ay Vig Oh 


ORIGINAL DATE 
December 1975 


SUBPROGRAM OR ADDITIONAL INFORMATION 
SCANER 


REPLACEMENT ARTICLE 
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HUNG Teletype Errors 


There is a one instruction time window in the RSTS/E Terminal 
Service which can result in hung teletype errors being logged ‘for 
interfaces which are actually operating properly. When ae hung 
teletype is incorrectly logged, the error log will usually report 
Interrupt Enable (bit 6) set and Ready (bit 7) reset in the 
tranmitter status register. This is a perfectly legal interface 
status which indicates that a character is being shifted out to 
the terminal. The incorrect hung teletype errors are known to 
oceur only on single line interfaces (KL11’s, DC11°s, and DL11‘s) 
but may occur frequently on lines running at high output baud 
rates (2400 baud and higher). Incorrect logging can occur at 
lower baud rates but with a much smaller probability. 


This problem does not disrupt system operation in any way but may 
confuse some one trying to interpret the error log report. The 
patch described below is not perfect. The probability of an 
incorrect hung teletype error log is reduced to an infinitesimal 
probability. 


PRODEDURE 


1. This is a pateh to the terminal service. It should be 
installed on all RSTS/E VO6A-02 systems. 


2. Obtain a listing of the RSTS load map. This map was’ printed 
during system generation if a line printer was available at 
that time. Otherwise, the map must be printed from the LICIL 
tape created at System Generation time (DECtape, or magtape 
distribution) or from the System Generation DECpack (RK 
distribution). If obtaining the map from tape media, print 
the file RSTS.MAP from the LICIL tape using PIP under RSTS/E, 
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the System Generation monitor, or any DOS monitor. If the 
media is DECpack, use extended PIP under RSTS/E with the /DOS 
Switch to print the file RSTS.MAP from account [1,1] on the 
System Generation DECpack or bootstrap the System Generation 
DECpack, LOGIN under account [1,1], and use PIP under DOS to 
print the file. 


On the first or second page of the RSTS map under the heading 
"Program Section Allocation Synopsis" find the section MON 
and record the first number to the right of the section name 
(first column of numbers). 


[MON] = 


On about the 6th page of the RSTS load map, find the heading 
n¥#* TITLE TTY IDENT: 06A.02 FILE TTY.OBJ". Scan down the 
left column for the section name TTY and locate the tag 
TTYHNG in the listing of global symbols. Record the number 
which appears immediately to the right of the tag TTYHNG. 


({TTYHNG] = 


This patch is one of those cases where we have to rely ona 
BASIC-PLUS program and some magic to find the location to 
patch. The program SCANER listed in Article #2.5.3 is used 
below to find the correct base address. SCANER is run under 
normal timesharing. 


RUN $SCANER 


BASE ADDRESS? [TTYHNG] From 4 above 
LIMIT ADDRESS? [MON] From 3 above 
ENTER WORDS TO MATCH - TERMINATE WITH ‘END’ 
OFFSET WORD 000000 CONTENTS ? 1404 
OFFSET WORD 000002 CONTENTS ? 162704 
OFFSET WORD 000004 CONTENTS ? 200 
OFFSET WORD 000006 CONTENTS ? 100411 
OFFSET WORD 000010 CONTENTS ? 1413 
OFFSET WORD 000012 CONTENTS ? 104207 
OFFSET WORD 000014 CONTENTS ? END 


PATTERN FOUND : BASE ADDRESS = [XXXXXX] used below 


READY 
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Whenever convenient, take the system down and then bootstrap 
the RSTS/E system disk normally to load the Initialization 
Code into memory. Then use the patch option of the INIT code 
to install the patch as shown below. 


OPTION: PATCH 
MODULE NAME? RSTS 


BASE ADDRESS? [XXXXXX] From 5 above 

OFFSET ADDRESS? 0 

MODULE BASE OFFSET OLD NEW? 

RSTS [XXXXXX] 000000 001404 ? 106304 

RSTS (XXXXXX] 000002 162704 ? 100413 

RSTS (XXXXXX] 000004 000200 ? 103415 

RSTS [XXXXXX] 000006 100411 2? 000240 

RSTS [XXXXXX] 000010 001413 2 000240 

RSTS [XXXXXX] 000012 104207 ? TC CONTROL/C Exit 


OPTION: 


74 


75 


RSTS/E Software Dispatch 
January 1976 


Incorrect Cursor Positioning When ECHO is Disabled 


There is an error in the RSTS/E V6A-02 terminal 
service which will reset a terminal's horizontal 
position counter when a carriage return is typed with 
echo disabied. Since no echo occurs, the cursor or 
carriage does not move. The actual position of the 
cursor or carriage, therefore, does not agree with the 
internal position counter. Subsequent tabs sent to 
the terminal will result in incorrect positioning. 
The POS function wltll also return an incorrect 
position. The error has caused some grief for several 
data entry application programs. The patch below will 
correct the-problem. 


PROCEDURE : 


1. This is a patch to the terminal service. It 
should be installed on all RSTS/E VbA-U2 systems. 


2. Obtain a listing of the RSTS load map. This map 
is printed during system generation if a line 
printer is available. Otherwise the map must be 
printed from the LICIL tape created during SYSGEN 
(DECtape or magtape distribution) or from the 
System Generation DECpack (RK distribution). If 
the distribution medium is DECtape or magtape, 
print the file RSTS.MAP from the LICIL tape using 
PIP under RSTS, the system generation monitor, or 
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any DOS monitor. If the distribution media is 
DECpack, use PIP with the DOS switch under RSTS/E 
to print the file RSTS.MAP from account (1,1) on 
the System Generation DECpack or bootstrap the 
System Generation DECpack, LOGIN under account 
(1,1), and use PIP under DOS to print the file. 


On the first page of the RSTS map under the 
heading "Program Section Allocation Synopsis" find 
the section <PATCH>. Record the first number to 
the right of each section name (first column of 
numbers). 


(PATCH) = 


On about the sixth page of the RSTS load map, find 
the heading “eeeTITLE TTY IDENT: UbA-02 FILE 
TTY.OBU". Scan down the left column for the 
section name <TTY> and locate the tag TTICRI in 
the listing of global symbols. Record the number 
which appears immediately to the right of the tag 
TTICRY. 


(TTICRO) = 


Bootstrap the RSTS/E system disk normally to load 
the Initialization Code into memory. Then use the 
patch option of the INIT code to install the patch 
as shown below. 


OPTION: PATCH 

MODULE NAME ? RSTS 

BASE ADDRESS ? (TTICR9) 

OFFSET ADDRESS ? 177700 

MODULE BASE OFFSET OLD NEW ? 

RSTS (TTICRS) 177700 116161 ? 004737 

RSTS (TTICRY) 177702 000034 ? (PATCH) +34 

RSTS (TTICRSI) 177704 0000U6 ? 0V0O240 

RSTS (TTICRI) 177706 032711 ? 'c 
CONTROL/C 
Exit 
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OPTION: 


PATCH 


MODULE NAME ? 


9? 


BASE ADDRESS ? 


RSTS 
(PATCH) 


OFFSET ADDRESS ? 34 
MODULE BASE 


RSTS 
RSTS 
RSTS 
RSTS 
RSTS 
RSTS 
RSTS 
RSTS 


OPTION: 


(PATCH) 
(PATCH) 
(PATCH) 
(PATCH) 
(PATCH) 
(PATCH) 
(PATCH) 
(PATCH) 


OFFSET 
000034 
000036 
000040 
000042 
QVOO0OKY 
VO0046 
900050 
900052 
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OLD 

000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
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NEW? 
032711 
044000 
001403 
116161 
000034 
000006 
000207 

? 4C 

CONTROL/C 

Exit 
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Crash Caused by Disabled DH11 Lines 


Due to an error in the terminal service, RSTS/E V6A-02 
will not come up for timesharing if any lines on a 
DH11 are disabled with the SETKEY option of the 
Initialization Code. The system will come up normally 
if ALL lines on the DH11 are disabled. The error is 
corrected with the following patch. 


PROCEDURE: 


1. This is a patch to the DH11 code in the terminal 
service. It should be installed on all RSTS/E 
VO6A-02 systems which are configured for one or 
more DH?71 multiplexers. 


2. Obtain a listing of the RSTS load map. This map 
was printed during System Generation if a line 
printer was available at that time. Otherwise, 
the map must be printed from the LICIL tape 
created at System Generation time (DECtape or 
magtape distribution) or from the System 
Generation DECpack (RK distribution). If 
obtaining the map from tape media, print the file 
RSTS.MAP from the LICIL tape using PIP under RSTS, 
the System Generation monitor, or any DOS monitor. 
If the media is DECpack, use PIP with the /DOS 
switch under RSTS/E to. print the file RSTS.MAP 
from account [1,1] on the System Generation 
DECpack. Alternatively, bootstrap the System 
Generation DECpack, LOGIN under account [1,1], and 
use PIP under DOS to print the file. 
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On the first page of the RSTS map under the 
heading "Program Section Allocation Synopsis" find 
the tag <PATCH> and record the first number to the 
right of the section name (first column of 
numbers). 


[PATCH] = 


On about the sixth page of the RSTS load map, find 
the heading "***TITLE TTY IDENT:06A.02 FILE 
TTY.OBJ", Sean down the left column for the 
section name <TTY> and locate the tag TTYHNG in 
the listing of global symbols. Record the number 
which appears immediately to the right of the tag 
TTYHNG, 


([TTYHNG] = 


Bootstrap the RSTS/E system disk normally to load 
the Initialization Code into memory. Then use the 
patch option of the INIT code to install the patch 
as shown below. 


OPTION: PATCH 

MODULE NAME? RSTS 

BASE ADDRESS? [TTYHNG] 
OFFSET ADDRESS? 177712 


MODULE BASE OFFSET OLD NEW? 
RSTS [TTYHNG] 177712 [XXX] 2?1C CTRL/C 
Exit 


SOFTWARE PRODUCT VERSION 
RSTS/E EXECUTIVE V06A-02 
COMPONENT VERSION 
TERMINAL SERVICE PATCHES N/A 
SUBPROGRAM OR ADDITIONAL INFORMATION SEQUENCE PAGE 
2.5.6* | 2 OF 3 
NEW REPLACEMENT ARTICLE ORIGINAL DATE 
[| Febryary 1976 


RSTS/E Software Dispatch 
February 1976 


Crash Caused by Disabled DH1l Lines 


OPTION: PATCH 

MODULE NAME ? RSTS 

BASE ADDRESS ? [TTYHNG] 

OFFSET ADDRESS ? [XXX]+242 Octal Addition 


MODULE BASE OFFSET OLD NEW? 
RSTS [TTYHNG] [XXX]+#242 032760 2004537 
RSTS LITYHNG] [XxXxX]+244 001000 2, PATCH]+12 
Octal Addition 
RSTS [TTYHNG] (XXX]+246 [YYY] 2000765 
{yYY] is used 
below 
RSTS [TTYHNG] [XXX]+250 001410 2+C CTRL/C Exit 
OPTION: PATCH 
MODULE NAME ? RSTS 
BASE ADDRESS ? [PATCH] 
OFFSET ADDRESS ? 12 
MODULE BASE OFFSET OLD NEW ? 
RSTS {PATCH] 000012 000000 2132761 
RSTS [PATCH] 000014 000000 72000001 
RSTS ([PATCH] 000016 000000 27000002 
RSTS [PATCH] 000020 000000 27001004 
RSTS [PATCH] 000022 000000 2005725 
RSTS [PATCH] 000024 000000 27032760 
RSTS [PATCH] 000026 0000900 2001000 
RSTS [PATCH] 000030 000000 ?LYYY] From above 
RSTS [PATCH] 000032 000000 7000205 
RSTS [PATCH] 000034 000000 2tC CTRL/C Exit 
OPTION: 
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RSTS/E 


2741 TERMINAL INTERFACE WIRING 


August 1975 


The DL11 (D's and E's) terminal line interfaces require a Special 
configuration for supporting the 2741. The configuration requires 
6 data bits, 1 start bit, 1 stop bit, odd parity, 134.5 baud, and 
rotary switch position 3 for both input and output (full counter- 
clockwise is position 1). The following jumpers apply to each 


condition: 

CONDITION JUMPER 

6 DATA BITS NB1 OUT 
NB2 IN 

1 STOP 2SB IN 
J9 OUT 
J10 IN 
J1l OUT 

ODD PARITY NP IN 
EPS IN 


The 134.5 baud specification requires a 1.03296M crystal (DEC part 


#18-05502-6). 


Refer to the DL11 Installation Procedure for specifications pertinent 


to the DL11D and DLIILE. 
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2741 Hardware tions Required by RSTS/E 


RSTS/E supports 2741-compatible terminals connected through DL11D, 
DLLIE, and DCll single-line interfaces or DH11 multiplexers. Certain 
2741 hardware options are required for proper operation under RSTS/E. 


The ability to detect "reverse breaks" is an option on 2741 terminals 
supplied by some manufacturers including IBM. A reverse break is a 
control sequence sent by the computer to a terminal which is currently 
transmitting (keyboard is unlocked). The purpose of the reverse 
break is to force the terminal into receive state (keyboard locked). 
RSTS/E sends a reverse break any time the system has output for the 
2741 terminal but internal status tables indicate that the terminal 

is in transmit state. If the terminal does not recognize the reverse 
break sequence, lock the keyboard, and switch to receive state, the 
output will be lost and the terminal can end up in a strange state. 


IBM refers to the reverse break detection capability on the IBM 2741 
Model 1 Communication Terminal as Feature #4708 - Receive Interrupt. 
This option must be installed on all IBM 2741 terminals for correct 
operation under RSTS/E. 


The ATTENTION key is also optional on IBM 2741 terminals and is 
required for operation under RSTS/E. The ATTN key generates a break 
which is interpreted in several ways by RSTS/E software. Section 5.8.1 
of the RSTS-11 System User's Guide (DEC-11-ORSUA-D-D) describes the 
various functions of the ATTN key. IBM refers to the ATTN key and 

the associated break generation hardware as Feature #7900 - Transmit 
Interrupt. This option is commonly included on 2741 terminals 
supplied by IBM and is a standard feature on many terminals supplied 
by other manufacturers. 
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Note on Lower and Upper Case Characters 
re wese Snaracters 


RSTS/E can always handle upper case characters in either input or 
output. 


RSTS/E V@6A-82 can receive lower case characters from any terminal capable 
of sending them. It will automatically convert all received lower case 
characters into upper case unless preservation of lower case is enabled 
through STTYSET. 


It can output any kind of character to a terminal. Not all terminals, 
however, are capable of printing lower case. If lower case is sent to 
an uppercase only DIGITAL terminal, for example, it will print it as 

upper case. S§TTYSET can also be used to cause RSTS/E to convert lower 
case characters to upper case before being transmitted to the terminal. 


For line printers capable of printing lower case, RSTS/E can be configured 
with the ability to send lower case characters to the line printer (s). 
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Noisy Telephone Lines 


PROBLEM: 


A user connected to RSTS by a telephone line gets detached and has 
to call back in and re-attach. Some of his output is lost. 


DISCUSSION: 


After carrier is lost on a dial-up line (usually caused by noise 
in the telephone system), RSTS allows five seconds for carrier to 
return and then detaches the job. During those two seconds 100 
characters may be sent to a 119 BAUD line and may be lost, or as 
many as 150 characters may be lost on a 300 baud line. 


The solution to this problem is costly in core. We do not feel the cost 
is justified, since it seldom causes any real difficulty to remote users. 
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Hung Teletype Errors on DCll Lines 


PROBLEM: 


Hung teletype errors will sometimes be logged on DCll lines when 
the receiver at the remote end is hung up. On some modems, the 
Clear to Send lead follows carrier and, therefore, drops when 
carrier drops (the phone is hung up). Clear to Send low inhibits 
transmitter interrupts on the DC1l interface. RSTS/E will log 

an error if the terminal service sees both INTERRUPT ENABLE and 
READY set in the output status register of the DCll. Normally, 
the device should interrupt under these conditions. The terminal 
service does not check to see if the interrupt was inhibited by 
Clear to Send being low. 


This condition arises if the receiver is being hung up with trans- 
missions pending. A similar situation arises if noise is induced 
on the line by the disconnect. The noise is interpreted as a 
character which the system tries to echo. From one to five errors 
(one per second) will be logged during the 5 second disconnect 
timeout. 


Clear to Send low does not inhibit transmitter interrupts on other 
types of terminal interfaces so the problem does not appear. 


SOLUTION: 


An option available on most Bell Data Sets will eliminate this 
problem on the DCll. The options required for the various types 
of data sets are listed below. Consult the phone company or modem 
manufacturer for installation of the options. 
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Hung Teletype Errors on DCll Lines 


OPTION REQUIRED FOR CORRECT 
BELL DATA SET OPERATION OF DCll INTERFACES 


163A3,103E,103G,103H The "CB-CF Indicate Separate" 
option should be installed. 


113B "The COMMON CB and CF option" 
should not be installed. 
Dataset leads CB (Clear to 


Send) and CF (Carrier) should 


present discrete signals to 
the terminal interface. 


103A,103A2,103F CB and CF circuits present 


identical signals. COMMON or 
SEPARATE options. are apparently 


not available. These data 
sets should not be used with 
the DC11 interface. 


If it is inconvenient to change data sets or install the required 
option, the Hung TTY errors can be ignored. They do not affect 


system operation in any way. 
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Understanding Synchronization Delays 


DIGITAL's new video terminals (VT50, VT52, etc.) use 
two special control characters (XOFF and XON) to 
request the host computer to suspend and resume data 
transmission. One use of this synchronization 
protocol allows the terminal to "freeze" a screen of 
data giving the user a chance to read it before it has 
scrolled off the screen. This special mode, called 
HOLD SCREEN MODE, Is enabled and disabled with escape 
sequences. Once enabled, the terminal detects when a 
line fs about to be scrolled from the screen. The 
character received from the host computer that would 
cause the scroll Is line feed (LF). At this point the 
terminal sends an XOFF to the host computer and awalts 
the user typing the SCROLL key. During this time the 
terminal will accept and buffer in a temporary storage 
area further characters recelved from the host 
computer. Even with the assumption that the host 
computer can cease transmission without any software 
delays, there are delays in line transmission § that 
cause a determinable number of characters to be 
recelved by the terminal after it has sent the XOFF. 
HOLD SCREEN MODE Is just one use of this 
synchronization protocol. Another use occurs [In the 
handiing of the hard copy option of the VT50 series 
terminals. The copler is slow (at least compared to 
the video screen) and the terminal must request host 
computer transmission suspension to avoid missing data 
when the copler is running. 
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Below is the formula used for calculating the worst 
case number of characters that would be received after 
the terminal has sent the XOFF. 


1+ ( 3*Y/X ) + 2*D*Y 


In this formula, X is the terminal's transmission rate 
In characters per second (CPS), Y is the host 
computer's transmission rate In CPS, and D Is the 
delay time in seconds for a character to travel from 
one end of the line to the other end. 


Considering the formula from left to right: 


The 1 is the character storage requirement for the 
line feed that triggered the XOFF in the first place. 


The 3*Y/X Is due to the nature of the UART (Universal 
Asynchronous Receiver/Transmitter) In the terminal. 
Since the UART Is double buffered, there can be two 
characters already in the UART's buffers when the 
terminal desires to send the XOFF. Those two 
characters plus the XOFF correspond to three character 
times of terminal to computer transmit during which 
time the computer may be sending to the terminal. 
Therefore, It is the ratio of the computer and 
terminal transmission rates that is Important for 
three terminal transmission times. 


The 2*D ts the total time delay for the line in both 
directions (the 2) to clear. During this time the 
host computer may have sent 2*D*Y characters to the 
terminal. 


The formula presented here is not completely correct 
for the VT50 sertes of video terminals. The VT50 
serles does not double buffer transmission to the host 
computer In Its UART. On the other hand, the formula 
can be used as a worst case formula to ensure correct 
operation of the XON/XOFF Synchronization Protocol. 


The VT50 series of video terminals have a temporary 
storage area capable of holding up _ to fourteen 
characters Including the LF that triggered the XOFF. 
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The following tables give the required size of a 
temporary storage area given: 1) the transmission 
speed (baud rate) from the computer to the terminal, 
2) the transmission speed from the terminal to. the 
computer, and 3) the physical delay of the 
transmission line. Local terminal connections have 
essentially a zero detay factor. The Telephone 
Company specifies a nominal worst case delay of 50ms 
in a coast to coast connection, assuming it is not via 
satellite. The horizontal scale of baud rates Is the 
baud rate from the computer to the terminal. 


The vertical scale of baud rates is the baud rate 
scale from the terminal to the computer. Baud rates 
can be converted to characters per second (CPS) by 
dividing the baud rate by 10 (1 start bit + 38 data 
bits + 1 stop bit = 10 bits) with the exception of 110 
baud which corresponds to 10 CPS (1 start bit + 8 data 
bits + 2 stop bits). 


Oms Line Delay 


110 150 300 600 1200 2400 4800 9600 

110 4 5 10 19 37 73 Las 289 
150 3 4 7 13 25 49 97 193 
300 2 3 4 7 13 25 49 97 
600 2 2 3 4 7 13 25 4g 
1200 1 1 2 3 7 13 25 
2400 1 1 1 2 3 4 7 13 
4800 1 1 1 1 2 3 4 7 
9600 1 1 1 1 1 2 3 y 

50ms Line Delay 

110 150 300 600 1200 2400 4800 9600 

110 5 7 13 25 49 97 193 385 
150 4 6 10 19 37 73 145 289 
300 3 4 7 13 25 4Q 97 193 
600 3 3 6 10 19 37 73 145 
1200 2 3 5 y 16 31 61 121 
2400 2 3 4 8 15 28 55 109 
4800 2 3 4 7 14 27 52 103 
9600 2 3 4 7 13 26 51 100 
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Terminal Fill Characters 


A table on page 4-46 of the RSTS-11 System User's Guide 
(DEC-11-ORSUA-D-D) Lists the number of fill (NUL) charac- 
ters sent for various control characters (CR,LF,HT,VT, and 
FF). The table is’ not quite correct and does not show all 
relevant information. The table below lists the actual 
number of fill characters sent after the various control 
characters for RSTS/E VO6A-02. 


DEC CHARACTERISTICS 


VAL | SCOPE  |NO SCOPE FORM NO FORM TAB 
13 N/A N/A N/A 
10 N/A N/A N/A 
9 N/A N/A eo 
ll 5x2Fill- Do 4 N/A 
LFs 
Fili-ll Do 4 N/A 
12 9x2 LFs 


Fill 0 is a special case which results in no fill characters 
being sent for any of the control characters. The expressions 
above do not apply for Fill 0. 
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KEYBOARD ASSIGNMENTS = OPTIONAL FILE pRocESSOR PATCH 
rr VES OUR PATO 


PROBLEM: 


RSTS/E systems normally permit any user to ASSIGN or OPEN 
any free keyboard for 1/0 operations. It Is sometimes very 
convenient to use a second terminal for special output or even to 
Interact with more than one terminal. The RSTS/E Implementation 
of multIi-terminal service requires that all slave terminals be 
ASSIGNed but not OPENed before a program can perform !/0 to a 
terminal in the multi-terminal set. 


In potenttally hostile environments such as _ educational 
Installations, the assignment of keyboards by non-privileged 
users may compromise system Integrity. Any user could assign a 
number of terminals and emulate the entire LOGIN dialogue with a 
fairly simple multi-terminal program. The program could be used 
to obtain passwords for accounts which would allow unrestricted 
access to those accounts. The person trying to log In would be 
unaware that his terminal was under control of a fellow student 
and would probably just try agaln when his first login attempt 
was unsuccessful. 


SOLUTION: 


The patch below makes the assignment of keyboards a 
privileged operation. In particular, multl-terminal service Is 
restricted to privileged programs or programs running under 
privileged accounts. With the patch Installed, a non-privileged 
user may ASSIGN and/or OPEN only his own keyboard (l.e. OPEN 
"KES" AS FILE N ‘Ts st!11 permitted). Priviteged users or 


programs may stl11 ASSIGN and/or OPEN any avallable keyboard. 


The system manager may choose to create a privileged program 
to allow selected non-privileged users to assign keyboards. The 
selection criterlon could be based on PPN, a special password, or 
any other appropriate protection mechanism. The program would 
use the "ASSIGN A DEVICE" SYS call to perform the actual keyboard 
assIlgnment. Non-privileged users who are allowed to use extra 
keyboards would simply run thls library program, assign the 
necessary devices, and exlit from the program. Once he exited 
from the privileged program, the user would again. be running 
non-privileged and could make no further keyboard assignments. 
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PROCEDURE: 


1. 


2. 


This patch Is optional but may be Installed on any RSTS/E 
VO6A-02 system. 


Obtain a listing of the RSTS toad map. This map Is printed 
during system generation If a_ line printer Is avallable. 
Otherwlse the map must be printed from the LICIL tape created 
during SYSGEN (DECtape or magtape distribution) or from the 
System Generation DECpack (RK distributlon). If the 
distribution medium fs DECtape or magtape, print the file 
RSTS.MAP from the LICIL tape using PIP under RSTS, the system 
generation monitor, or any DOS monitor. if the distribution 
medium Is RK disk cartridge, use Extended PIP under RSTS with 
the /DOS switch to print the fille RSTS.MAP from account [1,1] 
on the System Generation DECpack used for your system 
generation. Alternatively, bootstrap the System Generation 
DECpack, log Into the DOS/BATCH monitor with the LO 1,1 
command, and use PIP under DOS to print the map file. 


On the first page of the RSTS map under the heading "Program 
Section Allocation Sysnopsis" find the section <FIP>. Record 
the first number to the right of the section name (first 
column of numbers). 


[FIP] = 


Bootstrap the RSTS/E system disk normally to load the 
Initlallzation Code Into memory. Then use the PATCH option 
of the INIT code to Install the patch as shown below. 


OPTION: PATCH 

MODULE NAME ? RSTS 

BASE ADDRESS ? [FIP] 

OFFSET ADDRESS ? 772 

MODULE BASE OFFSET OLD NEW? 

RSTS [FIP] 000772 177777 ? 000002 

RSTS [FIP] 000774 001003 ? tC CONTROL/C EXIT 
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MAGTAPE DENSITY/PARITY DEFAULTS - OPTIONAL FILE PROCESSOR PATCH 
i 


The default density and parity settings for TU16 and TUuU10 
magtape operations under RSTS/E V06A-02 are 800 BPI and ODD 
parity. In previous versions of RSTS/E, these default settings 
could be changed with the MAGTAPE function but only for non-flle 
structured magtape processing. The MAGTAPE function has_ been 
extended In VO6A-02 to allow density and parity to be set for 
both non-file structured and fille structured operations. 

Furthermore, the system default settIngs for density and 
parity can be changed by the patch presented below. This 
facility will be useful If magtapes are to be frequently 
Interchanged with other systems which do not use the 800 BPI and 
ODD parity convention. 


NOTE: All RSTS/E VOGA-02 distribution magtapes (Including the 
COBOL/SORT magtape) are written at 800 BPI with ODD 
parity. This patch should not be Installed until after 
the system library bulld procedures Cincluding 
COBOL/SORT) are completed. 


PROCEDURE: 


1. This patch Is optional but may be Installed on any RSTS/E 
VO6A-02 system which Is configured for TU16 or TU10 magtape 
drives. 


2. Obtaln a listing of the RSTS load map. This map ts_ printed 
during system generation !f a Jine printer Is avallable, 
Otherwise the map must be printed from the LICIL tape created 
during SYSGEN (DECtape or magtape distribution) or from the 
System Generation DECpack (RK distributlton). lf the 
distribution medium fs DECtape or magtape, print the file 
RSTS.MAP from the LICIL tape using PIP under RSTS, the system 
generation monitor, or any DOS monitor. If the distribution 
medium Is RK disk cartridge, use extended PIP under RSTS with 
the /DOS switch to print the flle RSTS.MAP from account [1,1] 
on the System Generation DECpack used for your’ system 
generation. Alternatively, bootstrap the System Generation 
DECpack, log Into the DOS/BATCH monitor with the LO 1,1 
command, and use PIP under DOS to print the map fille. 
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On the first page of the RSTS map under the heading “Program 
Sectton Allocation Sysnopsis" find the section <FIP>. Record 
the first number to the right of the section name (first 
column of numbers). 


[FIP] = 


Select the desired magtape densIty and parity from the table 
below. The appropriate value from the [XXXXXX] column Is 
used In the patch to set the system default density and 
parity. 


TU1O TU10 TU16 [XXXXXX] 

9-TRACK 7-TRACK 9-TRACK 

800 BPI 800 BPI 800 BPI 060000 Normal 

ODD PARITY ODD PARITY ODD PARITY Default 
DUMP MODE 

800 BPI 800 BPI 800 BPI 064000 

EVEN PARITY EVEN PARITY EVEN PARITY 
DUMP MODE 

ILLEGAL ILLEGAL 1600 BPI 000000 


PHASE ENCODED 


Bootstrap the RSTS/E system disk normally to load _ the 
Initlallzation Code Into memory. Then use the PATCH option 
of the INIT code to Install the patch as shown below. 

OPTION: PATCH 

MODULE NAME ? RSTS 

BASE ADDRESS ? [FIP] 

OFFSET ADDRESS ? 1044 

MODULE BASE OFFSET OLD NEW? 

RSTS [FIP] 001044 060000 7? [XXXXXX] From 4& Above 

RSTS [FIP] 001046 116761 ? tC CONTROL/C Exit 


OPTION: 
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Problem with File Deletion Function 
aa ene Peletion Function 


PROBLEM: 


The file deletion function does not zero the disk blocks before 
deallocation of the file space. If another user creates and pre- 
extends a file (which also does not clear any disk blocks) and then 
proceeds to read blocks which he has not written, he may retrieve 
confidential information which previously occupied the assigned 
disk area. 


SOLUTION: 


This observation is correct. Unfortunately, all potential solutions 
to this problem would entail a great deal of system overhead. Owners 
of proprietary files should zero or use private file structures. 
Normally this does not present a problem since even a malicious user 
has no control over the disk area allocated to his files. Hence, 

it is unlikely that he will retrieve useful information. Further- 
more, during normal timesharing operations, the data left behind 
would be overwritten as files are created and deleted. 
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User File Directories 


PROBLEM: 


When User File Directories are clustered greater than the pack cluster 
size, creating more or larger files may be impossible because of 
insufficient contiguous space for extending the UFD. 


SOLUTION: 


Pre-extending files would waste space in the disk structure. The user 
who has the foresight to prepare for large files by setting the UFD 
cluster size larger than the pack cluster size must make the advance 
preparations to follow through by pre-extending his own files. (Once 
the UFD has been extended, it will not get smaller.) 
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File Protection Codes 


The RSTS/E system provides a number of ways to set or 
modify the protection code of a file. A number of recent 
SPR’s indicate that the subject is generally not well 
understood. This article will, hopefully, offer 
clarification. The following is a list of the means for 
setting and modifying protection codes. 


COMPILE 
The low order six bits of the user supplied code are 


retained, and the system sets the compiled file bit (code 
64) and resets the privileged program bit (code 128). 


EXAMPLES 
RESULTING 
PROTECTION CODE 

COMPILE<Q> 64 

COMPILE<40> 104 

COMPILE<128> 64 

COMPILE<2 32> | 104 

COMPILE 64 + System/job default 


(specified in an ASSIGN) 
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OPEN Statement 


When an OPEN statement which creates a file also specifies 
a protection code, the system will ignore any attempt to 
set the privileged program (128) or compiled file (64) 
protection codes. 


NAME AS Statement 


a ES 


The "NAME AS" statement allows a privileged user to assign 
any protection code to a file, while a non-privileged user 
may assign all privileged codes except (128) privileged 
program and (64) compiled file. 


PIP/RE Statement 


The renaming option in PIP utilizes a NAME AS command and 
therefore, obeys the "NAME AS" protection code rules. 


PIP Transfers 


In transferring a file, PIP utilizes an OPEN FOR OUTPUT 
command. This does not allow specification of either the 
COMPILED FILE (64) or PRIVILEGED PROGRAM (128) protection 
eodes in the OUTPUT file specification. 


BACKUP Transfers 


BACKUP utilizes an "OPEN FOR OUTPUT" statement for 
privileged or non-privileged users. 


It then executes a "NAME AS" statement for privileged 
users only. Therefore, non-privileged users cannot retain 
either the Compiled File or Privileged user protection 
codes. 


CONCLUSION 


The file protection codes set/reset mechanisms which are 
described above represent an orderly approach to the 


protection of files from non-privileged users. A detailed 
description of the privileged program protection code is 
eontained in the RSTS/E Programming Manual 


(DEC-11-ORPMA-A-D). 
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SPECIAL LINE PRINTER DRUMS - OPTIONAL DRIVER PATCH 
i i ae hoe A Sis ent Pei Rk 


The DEC standard LP11 line printer drums have one unused 
character position which corresponds to octal code 040 (ASCII 
SPACE character). Several non-standard drums are avallable with 
a special symbol In this character position. The most common 
special character Is the British Pound Sterling symbol £. 
Another special drum has been proposed for use In Latin American 
countries which Includes the fi In the SPACE position. The RSTS/E 
line printer driver is coded to handle these special printer 
drums. A single word patch Is used to define the ASCII code 
which will cause the spectal symbol to be printed. A simple 
hardware modification Is also required to enable printing of the 
character. 


LP11 printers are normally wired to print ASCII codes 0461 
through 137 (octal) for the 64 character set, or 041 through 177 
for the 96 character set. In addition to the normal printing 
character set, the command characters carriage return (015), line 
feed (012), and form feed (014) cause the appropriate printer 
response. The SPACE character, "non-printing" characters 
( < 040 ), and character codes > 137 on a printer with the 64 
character set all print as spaces. The space Is created by no 
printer action rather than a hammer actually striking the SPACE 
position on the drum. The hardware modification mentltoned above 
extends the range of printing characters to Include octal code 
040. If the drum contains a special symbol In the 040 position, 
any 040 code sent to the printer will cause the spectal character 
to be printed. The wiring changes required for the vartous DEC 
standard printers Is detalled on the last page of this article. 


The single word patch to the RSTS/E line printer driver ts 
also. stralghtforward. To permit the use of special drums, the 
driver normally translates all 080 codes (SPACES) to 037 (octal). 
Since 037 Is a non-printing character on all LPlls, spaces st!11 
print as spaces. If the hardware modification Its Installed, the 
printer expects to use code 040 for the spectal character. The 
patch, therefore, defines a 7 bit code which wlll be translated 
to 040 (In the driver) before being sent to the printer. 
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SInce there are many possible special characters, the choice 
of a character code to represent the special symbol Is left up to 
the system manager. tdeally a character should be chosen that Is 
not commonly used for other purposes but can be typed and printed 
on any standard termtnal. This will allow the special symbol to 
be Inserted Into text Intended for the printer using any standard 
editor. The cholce must be made with some discretion since the 
conversion performed in the driver overrides the standard symbol 
(if any) for the selected character code. Thus If the 101 code 
(the letter A) was selected, the special character would print In 
place of every letter A sent to the printer. In fact, It would 
then be Impossible to print an A. Obviously, 101 Is not a good 
chotce until A ts deleted from the alphabet. All normal printng 
characters have some meaning to RSTS/E or BASIC-PLUS. There are 
a few possible choices, however, which would cause only minor 
restrictions. The use of the character codes for & (046), @ 
(100), and CONTROL/N (016) are considered below. 


The & character Is seldom used In printed reports or text 
flles. Since there Is some physical similarity between & and cc , 
the ampersand code (046) might be a good choice for the Pound 
Sterling symbol. Certain types of conflicts In the use of a 
character do not cause any real problem. For example, the & 
character can be used to represent the [1,5] auxllfiary library 
account In flle specifications. There is no ambiguity If the & 
character is also used to represent the special symbol In text or 
strings intended for the printer. If a BASIC-PLUS program which 
used & In a file specification Its listed on the printer, the & 
would print as the special character. If thts effect Is not 
acceptable, the auxilftary library account can be named explicitly 
as [1,5]. Similarly, the & character is used by RUNOFF to denote 
underlining but Is not normally passed to the RUNOFF output file. 
When required, the & character can be passed to the output file 
a preceding it wlth an underscore character In the RUNOFF source 

Tle. 


The @ character Is also seldom used In printed materftal. In 
BASIC=PLUS the @ character can also be used In file 
specifications to denote an assignable account. This standard 
use of the @ character wlll not conflict with the use of @ to 
represent a special printer symbol except In BASIC=PLUS program 
listings. 
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If none of the standard printable characters are considered 
suitable, one of the ASCII control characters ( < 040 ) might be 
used. For example, CONTROL/N (016) can be generated with most 
terminals and wlll echo and print as +N on RSTS/E terminals if UP 
ARROW mode Is selected with TTYSET. CONTROL/N fs used for direct 
cursor addressing on VTO5 terminals but need not conflict with 
text uses of the character. CONTROL/N (016) might be a_e good 
cholce for the n symbol. 


The possibilities presented above are only suggestions. 
There Is probably no '"fdeal"™ character code to represent the 
special printer symbols. The only way to select an appropriate 
code Is to. study the ASCII code tables and consider the normal 
uses for each character. It Is easy to eliminate most characters 
which wlll leave only a few open to further consideration. The 
procedure to patch the line printer driver is described below. 


PROCEDURE: 


1. This patch Is optional but may be Installed on any RSTS/E 
VO6A-02 system. 


2. Obtain a listing of the RSTS load map. This map tIs_ printed 
during system generation If a IltIne printer Is avallable. 
Otherwise the map must be printed from the LICIL tape created 
during SYSGEN (DECtape or magtape distribution) or from the 
System Generatlon DECpack (RK distribution). if the 
distribution medium is DECtape or magtape, print the file 
RSTS.MAP from the LICIL tape using PIP under RSTS, the system 
generation monitor, or any DOS monitor. If the distribution 
medium Is RK disk cartridge, use extended PIP under RSTS with 
the /DOS switch to print the file RSTS.MAP from account [1,1] 
on the System Generation DECpack used for your system 
generation. Alternatively, bootstrap the System Generatton 
DECpack, log Into the DOS/BATCH monitor with the LO 1,1 
command, and use PIP under DOS to print the map file. 
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3. On the first page of the RSTS map under the heading "Program 
Section Allocation Sysnopstis" find the section <LPT>. Record 
the first number to the right of the section name (first 
column of numbers). 


[LPT] = 


&. Select the character code to represent the special printer 
symbol as outlined In the discussion above. Write the 7 bit 
binary character code In the space below and convert the full 
16 bit word to octal recording the result In the space 
provided. The value [CODE] will be used In the patch below. 


0 000 000 00 Write 7 bit code 


(CODE! = 0 0 O Convert to octal 


5. Bootstrap the RSTS/E system disk normally to load _ the 
Inittallzatlon Code Into memory. Then use the PATCH option 
of the INIT code to Install the patch as shown below. 


OPTION: PATCH 

MODULE NAME ? RSTS 

BASE ADDRESS ? [LPT] 

OFFSET ADDRESS ? 472 

MODULE BASE OFFSET OLD NEW? 

RSTS [LPT] 000472 177777 +? [CODE] From & Above 
RSTS [LPT] 000474 001002 ? tC CONTROL/C Exit 


OPTION: 
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PRINTER WIRING CHANGES: 


The hardware modification required Is different for the 
several printer models. As described above the purpose of the 
modification Is to extend the range of printing characters’ to 
Include octal 040. When this code Is sent to the printer, the 
SPACE position on the drum will be printed. If the drum has a 
special character In the SPACE posittion, the change wlll permit 
printing of the speclal character. The changes required for the 
varlous printers are listed below. 


LPO1l (2310) Wiring change required to card cage backplane. 
Remove wire from A3A4-36 and connect this wire 
through a 1K pullup resistor to +5 Volts. 


LPO2 (2410) Change to AR16 Data Register Card. Remove card 
from slot A3A24. LIft Pin 5 on Z15 and tie Pin 
5 to ground. 


LPO& (2470) Wiring change required to card cage backplane. 
Remove wire from A3A24-0h and connect this wire 
through a 1K pullup resistor to +5 Volts. 


LPOS (2230) Insert jumper Wl on the Logic Control Board 
29-21112. 
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RPO4 Position Failure 


PROBLEM: 

The head positioner in RPO4Y moving head disk drives 
occasionally failsto locate the READ/WRITE heads on the correct 
cylinder. When a read or write operation is attempted, a 


"Header Compare Error" is returned by the drive. Retries and 
offset positioning are ineffective since headers will never 
compare if the heads are located on the wrong cylinder. After 
all recovery attempts fail, a "USER DATA ERROR ON DEVICE" 
(ERR=13) is returned to the calling program. A second attempt 
to read the same block will normally be successful provided the 
heads have moved to a different cylinder to service another 
request. 


The following patch to the RPO4 disk driver will cause a drive 
recalibrate before offset recovery procedures are initiated. A 
recalibrate should correct any positioner error_ so that 
standard recovery procedures can succeed, 


PROCEDURE : 


1. This is a patch to the RPO4Y disk driver, It should be 
installed on all RSTS/E VO6A-02 systems configured for RPO4 
disks. 


2, Obtain a listing of the RSTS load map.» This map is printed 
during system generation if a line printer is available. 
Otherwise the map must be printed from the LICIL tape 
created during SYSGEN (DECtape or magtape distribution) or 
from the System Generation DECpack (RK distribution). If 
the distribution medium is DECtape or magtape, print the 
file RSTS.MAP from the LICIL tape using PIP under RSTS, the 
System generation monitor, or any DOS monitor. If the 
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distribution medium is DECpack, use extended PIP under 
RSTS/E with the /DOS switch to print the file RSTS.MAP from 
account bats on the System Generation DECpack, 


Alternatively, bootstrap the System Generation DECpack, 
LOGIN under account [1,1], and use PIP under DOS to. print 
the file. 


On the first page of the RSTS map under’ the heading 
"Program Section Allocation Sysnopsis,» find the section 
<RBDSK>. Record the first number to the right of each 
section name (first column of numbers), 


C[RBDSK] = 


There are two different RPO4 drivers supplied with the 
VO6A-02 system. One is the overlapped seek driver normally 
used on systems with two or more RPO4 drives. The other is 
a smaller non-overlapped driver used on single drive 
systems and on systems where monitor size is critical. The 
location of the patch depends’ on which driver is 
configured, To verify which driver is configured, check 
the third number to the right of the section name <RBDSK> 
in the load map (third column of numbers). This is the 
size of the driver (RBDSK CSECT). The overlapped driver 
size is 1346 octal bytes. The non-overlapped driver is 


41746 octal bytes. Wote which driver you have beiow. 
Overlapped Non-Overlapped 
THIRD Column = 0001346 THIRD Column = 001146 


Bootstrap the RSTS/E system disk normally to load the 
Initialization Code into memory. Then use the PATCH option 
of the INIT code to install the patch which follows. 
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YA. This section applies only to the overlapped seek driver 


OPTION: PATCH 

MODULE NAME ? RSTS 
BASE ADDRESS ? [RBDSK] 
OFFSET ADDRESS ? 1150 


MODULE BASE OFFSET 
RSTS [RBDSK] 001150 
RSTS [RBDSK] 001152 
OPTION: 


From 3 above 


OLD NEW ? 
046517 ? 046507 
153402 ? TC CONTROL/C Exit 


4B, This section applies only to the non-overlapped driver 


OPTION: PATCH 

MODULE NAME ? RSTS 
BASE ADDRESS ? [RBDSK] 
OFFSET ADDRESS ? 1074 


MODULE BASE OFFSET 
RSTS [LRBDSK] 001074 
RSTS [RBDSK] 001076 
OPTION: 
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OLD NEW ? 
046517 ? 046507 
153502 ? TC CONTROL/C Exit 


VERSION 
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Differences Between DEC and IBM Card Codes 


PROBLEM: 


The DEC 029 card code used by RSTS/E complies with the 
ANSI standard. IBM uses a card code which differs in 
three characters as shown below. 


CARD DEC 029 ASCII IBM ASCII 
PUNCH (ANSI) CODE CODE 
11-8-2 ] 135 ! 041 
11-8-7 + 136 ] 135 
12-8-7 ! 041 t 136 


If the DEC 029 card code is selected during the RSTS/E 
System Generation, the decode table can be changed to 
the IBM standard with a simple patch. Cards punched for 
use on IBM equipment can then be read without error. 


PROCEDURE: 
1. This is an optional patch to the DEC 029 Card decode 
table for IBM compatibility. The patch may be 


installed on any RSTS/E VOQ6A-02 system configured 


eS A Te eon a oe lo = 2 ie a wee 


for a card reader and DEC 029 card code. 


2. Obtain a listing of the RSTS load map. This map was 
printed during System Generation if a line printer 
was available at that time. Otherwise, the map must 


SOFTWARE PRODUCT VERSION 
RSTS/E Executive V06A-02 
COMPONENT VERSION 
Device Driver Patches N/A 
SUBPROGRAM OR ADDITIONAL INFORMATION SEQUENCE PAGE 
2.9.3 | 1 OF 2 
NEW REPLACEMENT ARTICLE ORIGINAL DATE 
January 1976 


1o7 


RSTS/E Software Dispatch 
January 1976 


Differences Between DEC and IBM Card Codes page 2 of 2 


OPTI 
MODU 


be printed from the LICIL tape created at System 
Generation time (DECtape or magtape distribution) or 
from the System Generation DECpack (RK 
distribution). If obtaining the map from tape 
media, print the file RSTS.MAP from the LICIL tape 
using PIP under RSTS/E, the System Generation 
monitor, or any DOS monitor. If the media is 
DECpack, use Extended PIP under RSTS with the /DOS 
switch to print the file RSTS.MAP from account 
i Gea le Alternatively, bootstrap the System 
Generation DECpack, LOGIN under account [1,1], and 
use PIP under DOS to print the file. 


On the first or second page of the RSTS map under 
the heading "Program Section Allocation Synopsis" 
find the section <DCDCDR> and record the first 
number to the right of the section name (first 
column of numbers). 


{DCDCDR] = 


Bootstrap the RSTS/E system disk normally to load 
the initialization code into memory. Then use the 
patch option of the INIT code to install the 
following patch. 


ON: PATCH 
LE NAME? RSTS 


BASE ADDRESS? [DCDCDR] 


OFFSET ADDRESS? 74 

MODULE BASE OFFSET OLD NEW? 

RSTS [DCDCDR] 000074 022135 ? 022041 Change ] to ! 
RSTS [DCDCDR] 000076 024452 ? <LF> No change 
RSTS [DCDCDR] 000100 057073 ? 056473 Change ¢# to ] 
RSTS [DCDCDR] 000102 023122 ? tC CONTROL/C Exit 
OPTION: PATCH 

MODULE? RSTS 

BASE ADDRESS? [DCDCDR] 

OFFSET ADDRESS? 122 

MODULE BASE OFFSET OLD NEW? 

RSTS [DCDCDR] 000122 O44441 ? 044536 Change ! to + 
RSTS [DCDCDR] 000124 003000 ? #C CONTROL/C Exit 
OPTION: 
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RPO4 Temporary Unsafe Conditions 


The RPO4Y drive has a class of errors that cause the 
drive to be temporarily unsafe. These errors cause an 
error interrupt with both the composite unsafe error 
bit and some other drive specific error bit on. StInce 
these errors are of a temporary nature they should be 
retried just like other non-fatal errors. The RSTS/E 
RPO4Y driver currently treats all unsafe type error 
conditions as fatal. The patch below changes the 
error recovery logic to retry the unsafe errors. 


PROCEDURE: 


1. This Is a patch to the RPO4& disk driver. It 
should be installed on all RSTS/E V0O6A-02 systems 
configured for RPO& disks. 


2. Obtain a listing of the RSTS load map. This map 
is printed during system generation if a line 
printer is available. Otherwise the map must be 
printed from the LICIL tape created during SYSGEN 
(DECtape or magtape distribution) or from. the 
System Generation DECpack (RK distribution). If 
the distribution medium Is DECtape or magtape, 
print the file RSTS.MAP from the LICIL tape using 
PIP under RSTS, the system generation monitor, or 
any DOS monitor. If the distribution medium is 
DECpack, use extended PIP under RSTS/E with the 
/DO0S switch to print the file RSTS.MAP- from 
account (1,1) on the System Generation DECpack. 
Alternatively, bootstrap the System Generation 
DECpack, LOGIN under account (1,1), and use PIP 
under DOS to print the file. 


SOFTWARE PRODUCT VERSION 
RSTS/E EXECUTIVE VO6A-02 
COMPONENT VERSION 
Device Driver Patches N/A 
SUBPROGRAM OR ADDITIONAL INFORMATION SEQUENCE PAGE 
2.9.4% oF 
NEW REPLACEMENT ARTICLE ORIGINAL DATE 
January 1976 


1 3 
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RPO4 Temporary Unsafe Conditions page 2 of 3 
Le On the first page of the RSTS map under the 


heading "Program Section Allocatton Sysnopsis" 
find the section <RBDSK>. Record the first number 
to the right of each section name (first column of 
numbers). 


(RBDSK) = 


There are two different RPO drivers supplied with 
the VO6A-02 system. One Is the overlapped seek 
driver normally used on systems with two or more 
RPO drives. The other ts a smaller 
non-overlapped driver used on single drive systems 
and on systems where monitor size is critical. 
The location of the patch depends on which driver 
Is configured. To verlfy whitch driver Ts 
configured, check the third number to the right of 
the section name <RBDSK> in the load map (third 
column of numbers). This ts the size of the 
driver (RBDSK CSECT). The overlapped driver size 
Is 1346 octal bytes. The non-overlapped driver is 
1146 octal bytes. Note which driver you have 
below. 


Overlapped THIRD Column 001346 


UL 


Non-overlapped THIRD Column 001146 


Bootstrap the RSTS/E system disk normally to load 
the Initlallzatiton Code Into memory. Then use the 
PATCH option of the INIT code to Install the patch 


following. 
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RPO04 Temporary Unsafe Conditions page 3 of 3 


4A. This section applies only to the overlapped seek 


driver 


OPTION: PATCH 

MODULE NAME ? RSTS 

BASE ADDRESS ? (RBDSK) 
OFFSET ADDRESS ? 322 
MODULE BASE OFFSET 
RSTS (RBDSK) 000322 
RSTS (RBDSK) 000324 


OPTION: 


OPTION: PATCH 

MODULE ? RSTS 

BASE ADDRESS ? (RBDSK) 
OFFSET ADDRESS ? 540 
MODULE BASE OFFSET 
RSTS (RBDSK) 000540 
RSTS (RBDSK) 000542 


From 3 above 


OLD NEW ? 
001124 ? 001123 
005260 ? {C CONTROL/C Exit 


OLD NEW? 
047007 ? 007007 
004014 ? tC CONTROL/C Exit 


4B. This section applies only to the non-overlapped 


driver 


OPTION: PATCH 

MODULE NAME ? RSTS 

BASE ADDRESS ? (RBDSK) 
OFFSET ADDRESS ? 320 
MODULE BASE OFFSET 
RSTS (RBDSK) 000320 
RSTS (RBDSK) 000322 


OPTION: 


OPTION; PATCH 

MODULE ? RSTS 

BASE ADDRESS ? (RBODSK) 
OFFSET ADDRESS ? 474 
MODULE BASE OFFSET 
RSTS (RBDSK) 000474 
RSTS (RBDSK) 000476 


OPTION: 


From 3 above 


OLD NEW ? 
001107 ? 001106 
011111 ? {C CONTROL/C Exit 


OLD NEW? 
047007 ? 007007 
001020 ? $C CONTROL/C Exit 
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Line Printer Interrupt Vector Assignments 


The M7930 Line Printer Interface Module does not have 
the hardware facility to assert data bit 2 as part of 
the interrupt vector address. This presents a problem 
for RSTS/E systems with three or more printers since the 
RSTS/E SYSGEN will assign a vector address for LP2, LP4, 
LP5, and LP7 which cannot be generated by the M7930 
hardware. The vectors and addresses assigned for LPO 
through LP7 are listed in the following table. Vectors 
for LP2, LP4, LP5, and LP7 must be patched if the M7930 
is used for these printer units. 


In the near future, the M7258 Line Printer Interface 
Module will replace the M7930. The M7258 can assert 
data bit 2 and can therefore generate all standard 
printer vectors. For printers connected to an M7258, it 
is only necessary to select the correct vector when 
installing the module. The following patches do not 
apply for any printer connected to an M7258. 


SOFTWARE PRODUCT VERSION 
RSTS/E EXECUTIVE VO6A-02 
COMPONENT VERSION 
DEVICE DRIVER PATCHES N/A 
PAGE 


SUBPROGRAM OR ADDITIONAL INFORMATION SEQUENCE 
2.9.5* | 1 OF g 
NEW REPLACEMENT ARTICLE ORIGINAL DATE 
[x ] | February 1976 
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Line Printer Interrupt Vector Assignments 


LINE VECTOR ASSIGNED UNIBUS VECTOR ADDRESS TO USE 
PRINTER BY RSTS/E SYSGEN ADDRESS FOR PRINTER MODULE 
UNIT M7930 M7258 

LPO 200 177514 200 200 

LP 1 170 164004 170 170 

LP2 174 164014 (LP2VEC]* 174 

LP3 270 164024 270 270 

LPA4 274 164034 CLP4VEC]*® 274 

LP5 774 164044 (LPSVEC]* 774 

LP6 770 164054 770 770 

LPT 764 164064 [LP7VEC] 764 


* Interrupt Vector Address must be selected by DEC Field 
Service dependent on the hardware configuration. 


SOFTWARE PRODUCT VERSION 
RSTS/E EXECUTIVE VO6A-02 


COMPONENT VERSION 
DEVICE DRIVER PATCHES N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION SEQUENCE PAGE 
2.9.5% 2 OF ¢ 


NEW REPLACEMENT ARTICLE ORIGINAL DATE 
[x] —_ February 1976 
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Line Printer Interrupt Vector Assignments 


PROCEDURE: 


1. 


The following patches apply to line printer units 
LP2, LP4, LP5, and LP7 if and only if they are 


connected to M7930 interface modules. 


Obtain a listing of the RSTS load map. This map was 
printed during System Generation if a line printer 
was available at that time. Otherwise, the map must 
be printed from the LICIL tape created at System 
Generation time (DECtape or magtape distribution) or 
from the System Generation DECpack (RK 
distribution). If obtaining the map from tape 
media, print the file RSTS.MAP from the LICIL tape 
using PIP under RSTS, the System Generation monitor, 
or any DOS monitor. If the media is DECpack, use 
Extended PIP under RSTS with the /DOS switch to 
print the file RSTS.MAP from account [1,1] on _ the 
System Generation DECpack. Alternatively, bootstrap 
the System Generation DECpack, LOGIN under account 


(1,1], and use PIP under DOS to print the file. 


On about the twelfth page of the RSTS map locate the 
heading "*##TITLE: MON IDENT:06A.02 FILE: RSTS.OBJ". 
Sean down the left column for the section <MON> and 
locate the tag FTLXXX in the listing of global 
symbols below the section heading. Record the first 


number to the right of the tag FTLXXX. 


(FTLXXX] = 


SOFTWARE PRODUCT VERSION 
RSTS/E EXECUTIVE VO6A-02 
COMPONENT VERSION 
DEVICE DRIVER PATCHES N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION SEQUENCE PAGE 
2.9.5* a OFg 
NEW REPLACEMENT ARTICLE ORIGINAL DATE 
[x] [] February 1976 
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Line Printer Interrupt Vector Assignments 


4, 


Record the vector assignments made by DEC field 
service and verify that the corresponding M7930°s 
have been correctly jumpered for selected vectors. 


{LP2VEC] 


[LP4VEC] 


(LP5VEC] 


(LP7VEC] 


Bootstrap the RSTS/E system disk normally to load 
the Initialization Code into memory. Then use the 
patch option of the INIT code to install the 
following patch. 


SOFTWARE PRODUCT VERSION 
RSTS/E EXECUTIVE VO6A-02 
COMPONENT VERSION 
DEVICE DRIVER PATCHES N/A 
SUBPROGRAM OR ADDITIONAL INFORMATION SEQUENCE PAGE 
2.9.5% | 40°F g 
NEW REPLACEMENT ARTICLE ORIGINAL DATE 
[x ] [ February 1976 
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Line Printer Interrupt Vector Assignments 


5A. Vector Patch for LP2. 


OPTION: PATCH 
MODULE NAME? RSTS 
BASE ADDRESS? 0 
OFFSET ADDRESS? 174 


MODULE BASE OFFSET OLD NEW? 

RSTS 000000 000174 (XXXXXX]) 2? C(FTLXXX] 

RSTS 000000 000176 [y2y2Y2] 7? 004340 

RSTS 000000 000200 22222? 2? tC CONTROL/C Exit 


OPTION: PATCH 

MODULE NAME ? RSTS 

BASE ADDRESS ? 0 

OFFSET ADDRESS ? [LP2VEC] 


MODULE BASE OFFSET OLD NEW? 

RSTS 000000 [LP2VEC] (FTLXXX]*® 2? [XXXXXX] 

RSTS 000000 [LP2VEC]+2 004340* 2? [Y2y2Y2] 

RSTS 000000 [LP2VEC]+4 272727? 2? 4C CONTROL/C Exit 


* The OLD contents of these locations should be 
verified. If they do not correspond to the values 
shown, the vector assigned is in use for some other 
device and should NOT be changed. Choose another 
interrupt vector address and cut the jumpers on the 
M7930 accordingly. 


SOFTWARE PRODUCT VERSION 
RSTS/E EXECUTIVE VO6A-02 
COMPONENT VERSION 
DEVICE DRIVER PATCHES N/A 
SUBPROGRAM OR ADDITIONAL INFORMATION SEQUENCE PAGE 
2.9.5 | 5 OFg 
NEW REPLACEMENT ARTICLE ORIGINAL DATE 
[x] [_] February 1976 
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Line Printer Interrupt Vector Assignments 


5B. Vector Patch for LP4. 


OPTION: PATCH 

MODULE NAME ? RSTS 
BASE ADDRESS ? 0 
OFFSET ADDRESS ? 274 


MODULE BASE OFFSET OLD NEW ? 

RSTS 000000 000274 (XXXXXX] ? [FTLXXX] 

RSTS 000000 000276 CY4y4y4] ? 004340 

RSTS 000000 000300 227222 ? $C CONTROL/C Exit 


OPTION: PATCH 

MODULE NAME ? RSTS 

BASE ADDRESS ? 0 

OFFSET ADDRESS ? [LP4VEC] 


MODULE BASE OFFSET OLD NEW? 

RSTS 000000 [LP4VEC] CFTLXXXJ* 2? [XXXXXX] 

RSTS 000000 [LP4VEC]+2 0043400" ? [Y4y4y4] 

RSTS 000000 [LP4¥VEC]+4 27272777? 2? fC CONTROL/C Exit 


* The OLD contents of these locations should be verified. 
If they do not correspond to the values shown, the 
vector assigned is in use for some other device and 
should not be changed. Choose another interrupt vector 
address and cut the jumpers on the M7920 accordingly. 


SOFTWARE PRODUCT VERSION 
RSTS/E EXECUTIVE V06A-02 
COMPONENT VERSION 
DEVICE DRIVER PATCHES N/A 
SUBPROGRAM OR ADDITIONAL INFORMATION SEQUENCE 
2.9.5* 


NEW REPLACEMENT ARTICLE ORIGINAL DATE 


[x] a February 1976 


PAGE 
6 OF 8 
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Line Printer Interrupt Vector Assignments 


5c. Vector Patch for LP5. 


OPTION: PATCH 

MODULE NAME ? RSTS 
BASE ADDRESS ? 0 
OFFSET ADDRESS ? 774 


MODULE BASE OFFSET OLD NEW? 

RSTS 000000 000774 [XXXXXX] ? [FTLXXX] 

RSTS 000000 000776 [Y¥5Y5¥5] ? 004340 

RSTS 000000 001000 22722272 2? $C CONTROL/C Exit 


OPTION: PATCH 

MODULE NAME ? RSTS 

BASE ADDRESS ? 0 

OFFSET ADDRESS ? [LP5VEC] 


MODULE BASE OFFSET OLD NEW? 

RSTS 000000 [LP5VEC] (FTLXXXJ]* 2? [XXXXXX] 

RSTS 000000 {LP5VECJ]+2 004340 ? CY5Y5Y5) 

RSTS 000000 [LP5VEC]+4 272777? ? tc CONTROL/C Exit 
OPTION: 


*® The OLD contents of these locations should be 


verified. If they do not correspond to the values 
shown, the vector assigned is in use for some other 
device and should NOT be changed. Choose another 


interrupt vector address and cut the jumpers on the 
M7930 accordingly. 


SOFTWARE PRODUCT VERSION 
RSTS/E EXECUTIVE VO6A-02 
COMPONENT VERSION 
DEVICE DRIVER PATCHES N/A 
SUBPROGRAM OR ADDITIONAL INFORMATION SEQUENCE PAGE 
2.9.5* 


7 OF . 


NEW REPLACEMENT ARTICLE ORIGINAL DATE 
[x] [|] February 1976 
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Line Printer Interrupt Vector Assignments 


5D. Vector Patch for LP7. 


OPTION: PATCH 

MODULE NAME ? RSTS 
BASE ADDRESS ? 0 
OFFSET ADDRESS ? 764 


MODULE BASE OFFSET OLD NEW? 

RSTS 000000 000764 {XXXXXX] ? ([FTLXXX] 

RSTS 000000 000766 (Y7Y7Y¥7] ? 004340 

RSTS 000000 000770 222222 2? {C CONTROL/C Exit 


OPTION: PATCH 

MODULE NAME ? RSTS 

BASE ADDRESS ? 0 

OFFSET ADDRESS ? [LP7VEC] 


MODULE BASE OFFSET OLD NEW? 

RSTS 000000 [LP7VEC] [FTLXXXJ* 2? [XXXXXX] 

RSTS 000000 [LP7VEC]+2 [004340)* 2? [Y7Y7Y7] 

RSTS 000000 [LP7VEC]+4 272722? ? $C CONTROL/C Exit 
OPTION: 


* The OLD contents of these locations should be 
verified. If they do not correspond to the values 
shown, the vector assigned is in use for some other 
device and should NOT be changed. Choose another 
interrupt vector address and cut the jumpers on the 
M7930 accordingly. 


SOFTWARE PRODUCT VERSION 
RSTS/E EXECUTIVE VO6A-02 
COMPONENT VERSION 
DEVICE DRIVER PATCHES N/A 
SUBPROGRAM OR ADDITIONAL INFORMATION SEQUENCE PAGE 
2.9.5% g OF, 
NEW REPLACEMENT ARTICLE ORIGINAL DATE 

[x ] [_] February 1976 


SOFTWARE DISPATCH ReTs/t 


CR11 CARD READER NOTES 


PROBLEM: 


The CR1l1 card reader normally performs a dark check at column 81 
of each card. Cards which have been verified using the IBM 129 

punch/verifier or similar devices will have a verification punch 
in column 81. This will result in a READ CHECK condition. 


SOLUTION: 


There is no way to fix this problem in software since the READ CHECK 
must be cleared manually at the card reader. There is, however, a 
hardware fix: 


The presence or absence of a wire jumper between pad A and pad B 
on the "CLOCK" card inside the CRl11 reader selects either column 0 
or column 81 for the dark check. Refer to the Documentation M200 
Card Reader Manual for the clock card schematic and the location 
of this printed circuit card in the reader. 


JUMPER A-B 


IN Selects dark check at Column 0 
OUT Selects dark check at Column 81 


The jumper should be present (IN) if cards are read which have 
verification punches in column 81. 


SOFTWARE PRODUCT VERSION 
RSTS/E Executive VO6A-02 
COMPONENT VERSION 
Device Driver Notes N/A 
SUBPROGRAM OR ADDITIONAL INFORMATION SEQUENCE PAGE 
CR1l1 Hardware 2.10.1 


OF 7. 


NEW REPLACEMENT ARTICLE ORIGINAL DATE 
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CR11 Card Reader Notes 


PROBLEM: 


The CR11 card reader normally performs a dark check at column 81 of each 
card. Cards which have been verified using the IBM 129 punch/verifier 

or similar devices will have a verification punch in colum 81. This will 
result in a READ CHECK condition. 


SOLUTION: 


There is no way to fix this problem in software since the READ CHECK must 
be cleared manually at the card reader. There is, however, a hardware 
fix: 


The presence or absence of a wire jumper between pad A and pad B on the 
"CLOCK" card inside the CR11 reader selects either column @ or column 81 
for the dark check. Refer to the Documentation M2@@ Card Reader Manual 
for the clock card schematic and the location of this printed circuit 
card in the reader. 


JUMPER A-B 


IN Selects dark check at Column g 
OUT Selects dark check at Column 81 


The jumper should be present (IN) if cards are read which have verification 
punches in column 81. 


SOFTWARE PRODUCT VERSION 
RSTS/E Executive VG6A-62 
COMPONENT VERSION 
Device Drivers General Notes 
SUBPROGRAM OR ADDITIONAL INFORMATION SEQUENCE # PAGE 
OF 
2.10.2 1 1 
NEW REPLACEMENT ARTICLE ORIGINAL DATE 


12] 


SOFTWARE DISPATCH RSTS/E 


PROBLEM WITH "SAVE" AND "REPLACE" = BASIC PATCH 


A "SAVE" or "REPLACE" of a BASIC-PLUS program with no lines 
results in a one block flle. Stnce this block Is never 
Initlallzed, a subsequent "OLD" or "RUN" to the file will give 
random and confusing results. The problem Is corrected by the 
patch below. 


PROCEDURE: 


1. This ts a patch to the BASIC-PLUS Run Time System. It should 
be Installed on all RSTS/E VO6A-02 systems. 


2. Obtaln a listing of the BASIC load map. This map Is_ printed 
during system generation [tf a Jtne printer Is avallable. 
Otherwlse the map must be printed from the LICIL tape created 
during SYSGEN (DECtape or magtape distribution) or from the 
System Generation DECpack (RK distribution). if the 
distribution medium ts DECtape or magtape, print the file 
BASIC.MAP from the LICIL tape using PIP under RSTS, the 
system generation monitor, or any DOS monitor. lf the 
distribution medium ts RK disk cartridge, use extended PIP 
under RSTS with the /DOS switch to print the file BASIC.MAP 
from account (1,1) on the System Generation DECpack used for 
your system generation. Alternatively, bootstrap the System 


Generation D&Cpack, toz Inte the DOS/BATCH monitor with the 


3. On the first page of the BASIC map under the heading "Program 
Section Allocation Sysnopsts" find the section <ED>. Record 
the first number to the right of the section name (first 
column of numbers). 


[ED] = 


SOFTWARE PRODUCT VERSION 
COMPONENT VERSION 
SUBPROGRAM OR ADDITIONAL INFORMATION SEQUENCE 


NEW REPLACEMENT ARTICLE ORIGINAL DATE 


foal 
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August 1975 


4, Bootstrap the RSTS/E system disk normally to load the 
Inittalizatilon Code Into memory. Then use the PATCH optton 
of the INIT code to [Install the patch as shown below. 


OPTION: PATCH 

MODULE NAME ? BASIC 

BASE ADDRESS ? [ED] 

OFFSET ADDRESS ? 3436 

MODULE BASE OFFSET OLD NEW? 

BASIC [ED] 003436 000001 7 0 

BAS IC [ED] 003440 000016 7? tC CONTROL/C Exit 


OPTION: 


SOFTWARE PRODUCT VERSION 

RSTS/E BASIC-PLUS VO6A-02 

COMPONENT VERSION 
BASIC PATCHES N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION SEQUENCE PAGE 
OF 
3.1.1] 2 2 
NEW REPLACEMENT ARTICLE ORIGINAL DATE 
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AUXILIARY LIBRARY ACCOUNTS - OPTIONAL SYSTEM PATCH 


The standard system library for RSTS/E systems 14s account 
[1,2]. This account Is normally referenced by the $ character In 
file specifications. The special characters ! % and & can also 
be used to reference three auxiliary libraries. The default 
assignments for auxiliary lfbrary accounts are ! for [1,3], % for 
[1,4], and & for [1,5]. Although the assoclatlion of character 
with account Is defined, the three accounts must be created with 
REACT before the special characters can be used in fille 
specifications. 


In some applications It may be advantageous to change the 
account numbers referenced by the three special characters. The 
account numbers are defined by three words In the BASIC-PLUS Run 
Time System. The default account numbers are altered with a - 
simple patch as described below. 


PROCEDURE: 


1. This Is an optional patch to the BASIC-PLUS Run Time System 
to change the default account numbers’ for the auxlllary 
library accounts. The patch may be Installed on any RSTS/E 
VO6A-02 system. 


2. Obtain a listing of the BASIC load map. This map fs. printed 
during system generation If a line printer ts avallable. 


Otherwise the map must be printed from the LICIL tape created 
during SYSGEN (DECtape or magtape distribution) or from the 
System Generation DECpack (RK distributlton). if the 


distribution medium is DECtape or magtape, print the file 
BASIC.MAP from the LICIL tape using PIP under RSTS, the 
System generation monitor, or any DOS monitor. If the 
distribution medium Is RK disk cartridge, use extended PIP 
under RSTS with the /DOS switch to print the fille BASIC.MAP 
from account [1,1] on the System Generation DECpack used for 
your system generation. Alternatively, bootstrap the System 
Generatlon DECpack, log Into the DOS/BATCH monitor with the 
LO 1,1 command, and use PIP under DOS to print the map fille. 


SOFTWARE PRODUCT VERSION 

COMPONENT VERSION 
SUBPROGRAM OR ADDITIONAL INFORMATION SEQUENCE 
NEW REPLACEMENT ARTICLE ORIGINAL DATE 


1% 
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3. On the first page of the BASIC map under the heading "Program 
Section Allocation Sysnopsis" find the section <PN>. Record 
the first number to the rlght of the section name (first 
column of numbers). 


[PN] = 


4. Decide what account numbers you wish to use for each special 
character and record those number on lines 5.C, 6.C, AND 7.C 
below. Any or all of the default assignments can be changed. 
Follow the procedure and example presented below. 


Write the desIred account number on line C. Convert the 
project number to elght bit binary; do the same for the 
programmer number. Remember that project and programmer 
numbers are expressed In decimal under RSTS. Write the two 
elght bit numbers on line D. Next, copy all 16 bits to line 
E which Is divided for correct conversion to octal. Convert 
the 16 blt binary number to a 6 digit octal number and record 
that result on IlIne F. The value on line F ts used In the 


patch. 

A. SPECIAL CHARACTER ! 

B. DEFAULT ACCOUNT [1,3] 

C. DESIRED ACCOUNT [ 220 , 36 ] 

D. CONVERT TO BINARY 11011100 , 00100100 
E. COPY 16 BITS 1 101 110 000 100 100 
F. CONVERT TO OCTAL 1 5 6 0 4 4 


SOFTWARE PRODUCT 


VERSION 
RSTS/E BASIC-PLUS VO6A-02 
COMPONENT VERSION 
BASIC Patches N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION SEQUENCE | PAGE 
Auxiliary Library Accounts 9.1.2 gor a 
NEW REPLACEMENT ARTICLE ORIGINAL DATE 


Ea 
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5. Repeat procedure for your ! iibrary 


A. SPECIAL CHARACTER ! 

B. DEFAULT ACCOUNT [1,3] 

C. DESIRED ACCOUNT [ ; ] 

D. CONVERT TO BINARY == teen enn ,. eeeeeSes 
E. COPY 16 BITS ee 
F. CONVERT TO OCTAL a ae a a oe 


6. Repeat procedure for your % library. 


A. SPECIAL CHARACTER % 

B. DEFAULT ACCOUNT [1,4] 

C. DESIRED ACCOUNT [ j ] 

D. CONVERT TO BINARY = #eeeeee8 , tecceees 
E. COPY 16 BITS wm ene wee cae one one 
F. CONVERT TO OCTAL - + - - - 7 


7. Repeat procedure for your & library. 


A. SPECIAL CHARACTER & 
B. DEFAULT ACCOUNT [1,5] 

C. DESIRED ACCOUNT [ ; 

D. CONVERT TO BINARY ee eee 
E. COPY 16 BITS Natl ice eder Zoey 
F. CONVERT TO OCTAL Se Met es 


SOFTWARE PRODUCT VERSION 
RSTS/E BASIC-PLUS VO06A-02 
COMPONENT VERSION 
BASIC Patches N/A 
SUBPROGRAM OR ADDITIONAL INFORMATION SEQUENCE PAGE 
Auxillary Library Accounts 3.1.2 OF 
NEW REPLACEMENT ARTICLE ORIGINAL DATE 
L_] 


3 4 
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8. Bootstrap the RSTS/E system disk normally to load the 
Inftlalizatlon Code Into memory. Then use the PATCH option 
of the INIT code to Install the patch as shown below. 


OPTION: PATCH 

MODULE NAME ? BASIC 

BASE ADDRESS ? [PN] 

OFFSET ADDRESS ? 0 

MODULE BASE OFFSET OLD NEW? 


BASIC (PN ] 000000 000402 ? <lIne feed> No Change 

BASIC [PN] 000002 000403 ? <account> From Line 5.F 
BASIC [PN] 0000048 000404 ? <account> From Line 6.F 
BASIC [PN] 000006 0004805 ? <account> From Line 7.F 
BASIC [PN] 000010 XXXXXX ? tC CONTROL/C Extt 


OPTION: 


SOFTWARE PRODUCT VERSION 
COMPONENT VERSION 
SUBPROGRAM OR ADDITIONAL INFORMATION SEQUENCE PAGE 


h OF 


NEW REPLACEMENT ARTICLE ORIGINAL DATE 
= 
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SPECIAL PRINT USING OPTIONS = OPTIONAL BASIC PATCH 


The Print-Using optlon of BASIC-PLUS provides for floating 
dollar stgns, comma Insertion every three digits to the left of 
the decimal polnt, and of course printing of the decimal point. 
The $-sign Is used for the currency symbol fn the Unlted States 
and Canada but various others symbols are used for other monetary 
systems. In England [ft would be useful to float the Pound 
Sterling symbol (or whatever ASCII character is used In place 
of the £ ) Instead of the $-sign. In France a floating France 
symbol (or F) would be generally more useful than the floating 
$-sign. The role of the comma and pertod are also reversed In 
France (e.g. 9999999.02 should be printed as F9.999.999,02). 


To accommodate these differences In monetary systems, 
Print-Using Is coded to allow substitution of any character for 
the floating currency symbol, the decimal point character, and 
the "every three digit character". These three characters are 
defined by three bytes In the PX Program Section [In BASIC. 
System defaults and several suggestions are shown In the table 


below : 

LOCATION USAGE DEFAULT ENGLAND FRANCE 
PX + 0 FLOATING CURRENCY SYMBOL $ (044) & (046) F (106) 
PX + 1 DECIMAL POINT CHARACTER » (056) . (056) , (054) 


PX + 2 EVERY THREE DIGIT CHARACTER , (054) , (054) . (056) 


Substitution of different characters, such as those listed 
under England and France above, Is done with a simple patch. Any 
change wilt effect both the Print-Using format string and the 
output produced. For example, If the suggestions under "FRANCE" 
were Installed, the following Print-Using statement would result 


In the output shown 3; 
PRINT USING "FF#, ######, ##"",3673298.02,4545.20 


F3.673.298,02 
F4U.454,20 


Since any change In this area does render the Print-Using 


documentation slightly Incorrect, an appropriate note should be 
published for users of the system. 


SOFTWARE PRODUCT VERSION 
RSTS/E BASIC-PLUS VO6A-02 
COMPONENT VERSION 
BASIC Patches N/A 
SUBPROGRAM OR ADDITIONAL INFORMATION SEQUENCE 
PRINT USING re re a i ae 
NEW REPLACEMENT ARTICLE ORIGINAL DATE 
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SOFTWARE DISPAICH ie 


PROCEDURE: 


1. This Is an optional patch to the BASIC-PLUS Run Time System 
to change the floating currency symbol, decimal point 
character, and/or the “every three digit character". The 
patch may be Installed on any RSTS/E VO6A-02 system which Is 
configured for Print-Using. 


2. Obtaln a llsting of the BASIC load map. This map is_ printed 
during system generation If a line printer Is avallable. 
Otherwlse the map must be printed from the LICIL tape created 
during SYSGEN (DECtape or magtape distribution) or from the 
System Generation DECpack (RK distribution). If the 
distribution medium is DECtape or magtape, print the file 
BASIC.MAP from the LICIL tape using PIP under RSTS, the 
system generation monttor, or any DOS monitor. If the 
distribution medium Is RK disk cartridge, use extended PIP 
under RSTS with the /DOS switch to print the file BASIC.MAP 
from account 1,1 on the System Generation DECpack used for 
your system generation. Alternatively, bootstrap the System 
Generation DECpack, log Into the DOS/BATCH monitor with the 
LO 1,1 command, and use PIP under DOS to print the map file. 


3. On the first page of the BASIC map under the heading "Program 
Section Allocation Sysnopsis" find the sectlon <PX>. Record 
the first number to the right of the section name (first 
column of numbers). 


&. Select the characters to be used for the floating currency 
symbol and the decimal point and [Insert the 7 bit ASCII codes 
for each on line D below. If one of the characters should 
not be changed, merely carry the default value down to line 
D. Next, copy all 16 bits to lIne E which fs divided for 
correct conversion to octal. Convert the 16 bit binary 
number to a 6 diglt octal number and record that number. on 
line F. The value on line F fs used In the patch. 


SOFTWARE PRODUCT VERSION 
RSTS/E BASIC-PLUS VO6A-02 
COMPONENT VERSION 
BASIC Patches N/A 
SUBPROGRAM OR ADDITIONAL INFORMATION SEQUENCE 
PRINT USING 3.1.3 OF 
2 3 
NEW REPLACEMENT ARTICLE ORIGINAL DATE 
ema 
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SOFTWARE DISPATCH tee 


A. LOCATION PX +1 , PX +0 
B. DEFAULT CHARACTER . (056) , $ (O44) 
C. DEFAULT CODE (BINARY) 00101110 , 00100100 
D. YOUR CODES (BINARY) 0 9 
E. COPY 16 BITS 0 “0 
F. CONVERT TO OCTAL 0 
- ew EXXX] 


5. Select the character to be used for the "every three digit 
character" and Insert the 7 bit ASCII code on Ifne D below. 
Note that the high order byte (PX+3) must remain. zero. if 
the "every three digit character" should not be changed, 
simply Ignore thls section entirely. The procedure ts the 
same as In section 4& above. 


A. LOCATION PX +3 , PX +2 
B. DEFAULT CHARACTER NULL (0) , , (054) 
C, DEFAULT CODE (BINARY) 00000000 , 00101100 
D. YOUR CODE — (BINARY) 00000000 , 0 

E. COPY 16 BITS 00000000 , 0 

F. CONVERT TO OCTAL 0 0 0 


= [YYY] 


6. Bootstrap the RSTS/E system disk normally to load the 
Initlallzation Code Into memory. Then use the PATCH option 


of the INIT code to Install the patch as shown below. 


OPTION: PATCH 

MODULE NAME ? BASIC 

BASE ADDRESS ? [PX] 

OFFSET ADDRESS ? 0 

MODULE BASE OFFSET OLD NEW? 

BASIC [PX] 000000 027044 ? [XXX] or <LF> From 4.F Above 
BASIC [PX] 000002 000054 ? lYYY] or <LF> From 5.F Above 
BASIC [PX] 000004 XXXXXX ? 1C CONTROL/C Exit 
OPTION: 


SOFTWARE PRODUCT VERSION 
RSTS/E BASIC-PLUS VO6A-02 
COMPONENT VERSION 
BASIC Patches N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION SEQUENCE PAGE 
PRINT USING 3.1.3 OF 

Coes 
NEW REPLACEMENT ARTICLE ORIGINAL DATE 


Ex ie 
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Array Data Destroyed by I/O Buffer Allocation 


PROBLEM: 


When an 1/0 channel Its opened the BASIC=PLUS 1/0 
buffer allocator must shuffle other 1/0 buffers and 
array data around the newly allocated 1/0 buffer. 
After the data has been shuffled, the allocator must 
correct all references to the moved data. If an 1/0 
channel is re-opened without an explicit close and the 
new 1/0 buffer Is larger than the old 1/0 buffer, the 
allocator does not correctly change all moved data 
references. This error is corrected by the following 
patch. 


PROCEDURE: 


1. This Is a patch to the BASIC-PLUS Run Time System. 
tt should be Installed on all RSTS/E VO6A~02 
systems. 


2. Obtain a listing of the BASIC load map. This map 
is printed during system generation if a_ line 
printer is available. Otherwise the map must be 
printed from the LICIL tape created during SYSGEN 
(DECtape or magtape distribution) or from the 
System Generation DECpack (RK distribution). lf 
the distribution medium ts DECtape or magtape, 
print the file BASIC.MAP from the LICIL tape using 
PIP under RSTS, the system generation monitor, or 
any DOS monitor. If the distribution medium is RK 


SOFTWARE PRODUCT VERSION 
RSTS/E BASIC-PLUS VO6A-02 


COMPONENT VERSION 
BASIC Patches N/A 
SUBPROGRAM OR ADDITIONAL INFORMATION SEQUENCE 
3.1.4* 
NEW REPLACEMENT ARTICLE ORIGINAL DATE 
[x ] [| January 1976 


PAGE 
1 OF 3 
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Array Data Destroyed by I/O Buffer Allocation 


disk cartridge, use extended PIP under RSTS with 
the /DOS switch to print the file BASIC.MAP from 
account (1,1) on the System Generation DECpack 
used for your system generation. Alternatively, 
bootstrap the System Generation DECpack, log [Into 
the DOS/BATCH monitor with the LO 1,1 command, and 
use PIP under DOS to print the map file. 


On the first page of the BASIC map under the 
heading "Program Section Allocation Synopsis" find 
the sections <RC> AND <PA>. Record the first 
number to the right of the section name (first 
column of numbers). 


Bootstrap the RSTS/E system disk normally to load 
the Initialization Code Into memory. Then use the 
PATCH option of the INIT code to Install the patch 
as shown below. 


OPTION: PATCH 
MODULE? BASIC 

BASE ADDRESS? (RC) 
OFFSET ADDRESS? 5720 


MODULE BASE OFFSET OLD NEW? 

BASIC (RC) 005720 004767 ? 042700 
BASIC (RC) 005722 176402 ? 000001 
BASIC (RC) 005724 042700 ? 001402 
BASIC (RC) 005726 000001 ? 004737 
BASIC (RC) 005730 100002 ? (PA) 

BASIC (RC) 005732 012700 ? 004767 
BASIC (RC) 005734 077776 ? 176370 

? {C CONTROL/C Exit 


BASIC (RC) 005736 010046 


page 2 of 3 


Array Data Destroyed by I/O Buffer Allocation 


OPTION: 


PATCH 
MODULE? BASIC 


BASE ADDRESS? (PA) 
OFFSET ADDRESS? 0 


MODULE 
BASIC 
BASIC 
BASIC 
BASIC 
BASIC 
BASIC 
BASIC 
BASIC 
BASIC 
BASIC 
BASIC 
BASIC 
BASIC 
BASIC 
BASIC 
BASIC 
BASIC 
BASIC 


OPTION: 


BASE 
(PA) 
(PA) 
(PA) 
(PA) 
(PA) 
(PA) 
(PA) 
(PA) 
(PA) 
(PA) 
(PA) 
(PA) 
(PA) 
(PA) 
(PA) 
(PA) 
(PA) 
(PA) 


OFFSET 
000000 
000002 
000004 
000006 
000010 
000012 
000014 
000016 
000020 
000022 
000024 
000026 
000030 
000032 
000034 
000036 
000040 
000042 


OLD 

000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
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January 1976 


page 3 of 3 


NEW? 
100002 
012700 
077776 
010203 
060403 
005763 
000004 
001410 
020063 
000004 
001405 
010046 
005000 
004776 
000002 
012600 
000207 
{C CONTROL/C Exit 


i} Ml” Mi ide ie Mie ie ie Mie in” ie” Mee ie ia * i ie © in 
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Changing Default Scale Factor 


The system default SCALE factor may be modifled by 
utilizing the procedure in this article (first patch). 
In addition, the warning message (SCALE FACTOR 
INTERLOCK) associated with SCALE may be deleted 
(second patch). 


PROCEDURE : 


1. This Is a patch to the BASIC-PLUS Run Time System. 
It is an optional patch and is only for systems 
with the 4-word, scaled match packages. 


2. Obtain a listing of the BASIC load map. This’ tap 
is printed during system generation if a line 
printer is available. Otherwise the map must be 
printed from the LICIL tape created during SYSGEN 
(DECtape or magtape distribution) or from the 
System Generation DECpack (RK distribution). If 
the distribution medium is DECtape or magtape, 
print the file BASIC.MAP from the LICIL tape using 
PIP under RSTS, the system generation monitor, or 
any DOS mont tor. If the distribution medium is RK 
disk cartridge, use extended PIP under RSTS with 
the /DOS switch to print the file BASIC.MAP from 
account (1,1) on the System Generation DECpack 
used for your system generation. Alternatively, 
bootstrap the System Generation DFECpack, log into 
the DOS/BATCH monitor with the LO 1,1 command, and 
use PIP under DOS to print the map file. 


SOFTWARE PRODUCT VERSION 
RSTS/E BASIC-PLUS VO06A-02 


COMPONENT VERSION 
BASIC Patches N/A 
SUBPROGRAM OR ADDITIONAL INFORMATION SEQUENCE Cae 
3.1.5* 
se ae ARTICLE ORIGINAL DATE 
January 1976 
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Changing Default Scale Factor page 2 of 2 


3. From the BASIC map under the module SU record 
number to the right of the tag ..SCA. 


(..SCA.) = 


Next under the module ED find the tag ..SCE. 
record the number to the right of this tag. 


(..SCE.) = 


4, Bootstrap the RSTS/E system disk normally to 


the Initiallzation Code into memory. Then use the 
PATCH option of the INIT code to install the patch 


as shown below. 


OPTION: PATCH 

MODULE NAME ? BASIC 

BASE ADDRESS ? (..SCA.) 

OFFSET ADDRESS ? 0 

MODULE BASE OFFSET OLD NEW? 

BASIC (..SCA.) 000000 000000 ? (A) Note l. 


BASIC (..5CA.) UOU002 KXXXXXX ? $C CONTROL/C Exit 


Note: A = The desired SCALE factor 0 to 6. 


OPTION: PATCH 

MODULE NAME ? BASIC 

BASE ADDRESS ? (..SCE.) 

OFFSET ADDRESS ? 0 

MODULE BASE OFFSET OLD NEW? 
BASIC (..SCE.) 000000 104577 ? v00240 


BASIC (..SCE.) U00002 XXXXXX ? 4{C CONTROL/C Exit 
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THE LEXICAL ANALYZER DOES NOT POOL LITERAL FLOATING POINT 1 


PROBLEM: The BASIC-PLUS lexical analyzer was coded to pool a 
literal floating point 1. 


DISPOSITION: By installing the patch below the problem will be 
solved, 


1. This is a patch to the BASIC-PLUS Run-time System. It should 
be made on all VO6A-02 systems. 


2. Obtain a listing of the BASIC load map. This map is. printed 
during system generation if a line printer is available. 
Otherwise the map must be printed from the LICIL tape created 
during SYSGEN (DECtap+ or magtapes distribution) or from the 
System Generation DECpack (RK distribution). If the 
distribution medium is DECtape or mMagtape, print the file 
BASIC.MAP from the LICIL tape using any DOS monitor. If the 
distribution medium is RK disk cartridge, use extended PIP 
under RSTS with the /DOS switeh to print the file BASIC.MAP 
from account [1,2] on the System Generation DECpack used for 
your system generation. Alternatively, bootstrap the System 
Generation DECpack, log into the DOS/BATCH monitor with the 
LO 1,1 command, and use PIP under DOS to print the map file. 


3. On the first page of the BASIC map under the heading "Program 
Section Allocation Synopsis" find the section <LA> and record 
the first number to the right of the section name (first 
column of numbers). 


<LA> = 


4, Bootstrap the RSTS/E system disk normally to load the 
initialization code into memory. Then use the PATCH option 
of the INIT code to install the following patch. 


OPTION: PATCH 
MODULE? BASIC 

BASE ADDRESS? (LA) 
OFFSET ADDRESS? 3262 


MODULE BASE OFFSET OLD NEW? 

BASIC (LA) 003262 162702 ? 062702 

BASIC (LA) 003264 XXXXXX ? <LF> 

BASIC (LA) 003266 162705 ? 062705 

BASIC (LA) 003270 XXXXXX ? TC CTRL/C Exit 

OPTION: 
RSTS/E BASIC-PLUS Seq 3.1.6* 
BASIC-PLUS PATCHES lof 1 
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SUBSCRIPTING ERRORS 


PROBLEM: Under certain conditions (such as negatives subscripts) 
the BASIC-PLUS subscripting algorithms do not produce the 
SUBSCRIPT OUT OF RANGE error as they should. 


DISPOSITION: This patch correets the problem. 


1. This is a patch to the BASIC-PLUS Run-time System. It should 
be made on all VO6A-02 systems. 


2. Cbtain a listing of the BASIC load map. This map is printed 
during system generation if a line printer is available, 
Otherwise the map must be printed from the LICIL tape created 
during SYSGEN (DECtape or magtape distribution) or from the 
System Generation DECpack (RK distribution). If the 
distribution medium is DECtape or magtape, print the file 
BASIC.MAP from the LICIL tape using any DOS monitor. If the 
distribution medium is RK disk cartridge, use extended PIP 
under RSTS with the /DOS switch to print the file BASIC.MAP 
from account [1,2] on the System Generation DECpack used for 
your system generation. Alternatively, bootstrap the System 
Generation DECpack, log into the DOS/BATCH monitor with the 
LO 1,1 command, and use PIP under DOS to print the map file. 


3. Find under module XCMA2 (or XCMA4 for 4Heword) the global 
symbol INDARY. 


<INDARY>D = 


4, Bootstrap the RSTS/E system disk normally to load the 
initialization code into memory. Then use the PATCH option 
of the INIT code to install the following patch. 


OPTION: PATCH 

MODULE? BASIC 

BASE ADDRESS? (INDARY) 
OFFSET ADDRESS? 104 


MODULE BASE OFFSET OLD NEW? 
BASIC (INDARY) 000104 O02404 7? 103404 
BASIC (INDARY) 000106 003374 7? 101374 
BASIC ( INDARY) 000110 005780 2? tC CTRL/C Exit 
OPTION: 
RSTS/E BASIC-PLUS Seq 3.1.7* 
BASIC=-PLUS PATCHES lofl 
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MAT INVERSE FAILS AT SCALE FACTOR 6 


PROBLEM: The MAT inverse function fails at seale factor 6 and 
produces the error mzssage SUBSCRIPT OUT OF RANGE, 


DISPOSITION: The following patches will correct this problem, 


1. This is a pateh to the BASIC-PLUS Run-time System. It should 
be made on all VO6A-02 systems with MAT commands. 


2. Optain a listing of the BASIC load map. This map is) printed 
during system generation if a line printer is available. 
Otherwise the map must be printed from the LICIL tape created 
during SYSGEN (DECtape or magtape distribution) or from the 
System Generation DECpack (RK distribution). If the distri- 
bution medium is DECtape or magtap#, print the file BASIC.MAP 
from the LICIL tape using any DOS monitor. If the distribu- 
tion medium is RK disk cartridge, use extended PIP under RSTS 
with the /DOS switch to print the file BASIC.MAP from account 
[1,2] on the System Generation DECpack used for your system 
Generation. Alternatively, bootstrap the System Generation 
DECpack, log into the DOS/BATCH monitor with the LO 1,1 con- 
mand, and use PIP under DOS to print the map file. 


3. On thes first page of the BASIC map under the heading "Program 
Seetion Allocation Synopsis" find the section <HX> and record 
the first number to the right of the section name (first co- 
lumn of numbers). 


<MX> = 


4. Bootstrap the RSTS/E system disk normally to load the ini- 
tialization code into memory, Then use the PATCH option of 
the INIT codv to install the following patch. 


RSTS/E BASIC-PLUS Seq 3.1.8* 
BASIC-PLUS PATCHES l of 2 
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OPTION: PATCH 
MODULE? SASIC 

BASE ADDRESS? (HX) 
OFFSET ADDRESS? 2134 


MODULE BASE OFFSET 
BASIC (MX) 002134 
BASIC (MX) 002136 


OPTION: PATCH 
HODULE? BASIC 

BASE ADDRESS? (MX) 
OFFSET ADDRESS? 2176 


HODULE BASE OrFSET 
BASIC CNX) 002176 
BASIC (1X) 902200 


OPTION: PATCH 
MODULE? BASIC 

BASE ADDRESS? (MX) 
OFFSET ADDRESS? 2312 


MODULE BASE OFFSET 
BASIC (UX) 002312 
BASIC (ix) v02314 
BASIC Ctx) JU2316 
BASIC (MX) 092320 
bASIC (xX) 002322 
BASIC (HX) 002324 


OPTION: PATCH 
NODULE? BASIC 

BASE ADRESS? (MX) 
OFFSET ADDRESS? 2556 


MODULE BASE OFFSET 
BASIC (MX) 002556 
BASIC (4X) 002560 
3ASIC (MX) 002562 
BASIC (HX) 9025604 
BASIC (11X) 002566 


OPTION: 


RSTS/E BASIC-PLUS 
BASIC-PLUS PATCHES 


MAT INVERSE FAILS AT SCALE FACTOR 6 


OLD 
175342 
177763 


OLD 
175342 
TIF 219 


OLD 

175330 
177644 
140330 
146076 
157372 
123521 


OLD 

153372 
9020900 
140075 
161372 
125277 


Hew? 


a 
4 


177342 
tc CTAL/C Exit 


NEW? 


2 
‘4 


177342 
to CTRL/C Exit 


NEw? 


PDD IN ND ON DD 


177330 

<LF> 

<LF> 

<LFD 

157376 

tc CTRL/C Exit 


Now? 


~ 


20 9D od 


153376 

<LFD 

<LF> 

161376 

tc CTRL/C Exit 


Seq 3.1.8* 
2 of 2 


1% 
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IAMEDIATE MODE "RKeTuRN" 


PROSLESS Issuing the RETURN command from inmediat+ mods does 
not properly return from the subroutine and can cause other 
errors sucn as memory management violations later. Tnis patch 
corrects the proolem by disallowing an immediate mods return and 
giving the PLEASE USE THE RUN COMMAND error instead, 


DISPOSITION: Tne following patch corrects the problem. 


1; This is a patch to tne BASIC-PLUS Run-time System. It should 
be nad+= on all VO6A-02 systems. 


2. Obtain a listing of the BASIC load map. Tnis man is) printed 
during system generation if a lines printer is available. 
Otherwise the map must b= printed from the LICIL tan~ created 
during SYSGEN (DECtap? or magtape distribution) or from the 
System Generation DECpack (RK distribution). If the 
distribution medium is DECtape or mantape, print the file 
BASIC.MAP from the LICIL tan= using any DOS monitor. If the 
distrioution medium is RK disk cartridge, use extended PIP 
under RSTS with th- /DOS switeh to print the file BASIC.MAP 
from account (1,2) on the System Generation DECpack used for 
your system generation. Alternatively, bootstrap the Svsten 
Generation DECpack, low into the DOS/BATCH monitor with the 
LO 1,1 command, and use PIP und=r DOS to print the map file. 


3. On the first page of the BASIC nap under the heading "Proprar 
Section Allocation Synopsis" find the seetion <RC> and <PA>, 
record the first number to the right of the section name 
(first column of numbers). 


<RC> 


<PA> 


4, Bootstrap the RSTS/E system disk normally to load the 
initialization code into memory. Then use the PATCH option 
of the INIT code to install the following patch. 


RSTS/E BASIC-PLUS Seq 3.1.9* 
BASIC-PLUS PATCHES l of 2 
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IMMEDIATE MODE "RETURN" 


OPTION: PATCH 
MODULE? BASIC 

BASE ADDRESS? (RC) 
OFFSET ADDRESS? 1524 


MODULE BASE OFFSET 
BASIC (RC) 001524 
BASIC (RC) 001526 
BASIC (RC) 001539 
BASIC (RC) 001532 
BASIC (RC) 001534 
BASIC (RC) 001536 


OPTION: PATCH 
MODULE? BASIC 

BASE ADDRESS? (RC) 
OFFSET ADDRESS? 1640 


MODULE BASE OFFSET 
BASIC (RC) 001040 
BASIC (RC) 001642 
BASIC (RC) 001644 


OPTION: PATCH 
MODULE? BASIC 
BASE ADDRESS? (PA) 
OFFSET ADDRESS? 42 


MODULE BASE OFFSET 
BASIC (PA) Q000K2 
BASIC (PA) 000044 
BASIC (PA) 009046 
BASIC (PA) 000050 
BASIC (PA) 000052 
BASIC (PA) 099054 
BASIC (PA) 000056 
BASIC (PA) 000960 
BASIC (PA) v09U62 
BASIC (PA) 000064 
BASIC (PA) 009966 
BASIC (PA) 000070 
ZASIC (PA) 090072 
BASIC (PA) 000074 
BASIC (PA) 000076 
3ASIC (PA) 090100 
BASIC (PA) 000102 
OPTION: 


RSTS/E BASIC-PLUS 
BASIC-PLUS PATCHES 


OLD 

005362 
900522 
095761 
000006 
001010 
916704 


OLD 

005041 
995241 
016702 


OLD 

000090 
000000 
009000 
000000 
0900000 
000099 
900000 
000000 
990000 
000000 
999000 
000000 
000090 
0009000 
000090 
000000 
999090 


q 
? 
? 
ae 
? 
? 
? 


Hq 
i 


? (PA)+72 


Ne 4? 


904537 


(PA)+42 


000420 
000522 
000240 


to CTRL/C Exit 


EW? 
004737 


2 tc CTRL/C Exit 


NEW? 


2 


DD DD ND OD DN OD HD 


095761 
009006 
0010190 
005725 
032761 
000001 
900904 
001403 
005725 
005362 
000522 
0090205 
005041 
012741 
000001 
000207 


te CTRL/C Exit 


Seq 3.1.9* 
2 of 2 
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PILE WOT CLOSED PROPERLY 


PROBLEM: An input or output line after the fil+ has been closed 
Will sometimes not return the error 1/0 CHANNEL "OT OPEN. 


DISPOSITION: This patch corrects the problem, 


1. This is a patch to th+ BASIC-PLUS Run-time System, It should 
be made on all VO6OA-02 systems. 


e. Obtain a listing of the BASIC load map. This map is printed 
during system feneration if a line printer is available. 
Otherwise the map aust be printed from the LICIL tape created 
during SYSGEN (DECtape or magtape distribution) or from the 
System Generation DECpack (RK distribution). If the distri- 
Oution mediun is DECtaps or mastape, print the file RASIC.MAP 
from the LICIL tape using any DOS monitor. If the distridu- 
tion medium is RK disk cartridge, use extended PIP under RSTS 
with the /DOS switen to print the fil- BASIC.MAP from aceount 
i1,2] on the System Generation DECpack used for your systen 
Zeneration, Alternatively, bootstrap the System Generation 
bECpack, loz into th» DOS/BATCH monitor with th= LO 1,7 come 
mand, and use PIP und-r DOS to print the nap file. 


Bx On th- first pase of the BASIC map under the headine "Progran 
Seetion Allocation Synopsis" find the section <RC> and r#ecord 
the first number to the right of the section nane (first coe 
lumn of numbers). 


<RC> = 


4, Bootstrap the RSTS/E systen disk normally to load the ini- 
tialization ecode into memory. Then use the PATCH ontion of 
the INIT cod to install the following patch. 

OPTION: PATCH 

MODULE? EASIC 

BASE ADDRESS? (RC) 

OFFSET ADDRESS? 4664 

AODULE BASE OFFSET OLD NEW? 

BASIC (RC) 004664 095762 ? 005763 

BASIC (RC) 004606 000004 9? Tc CTRL/C Exit 

OPTION: 
RSTS/E BASIC-PLUS Seq 3.1.10* 
BASIC-PLUS PATCHES lof 1 
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PRIVILEGED PRCOGRA. CHAINING TO A .BAS FILE 


PaOBLES: If a privileged program running under a onon-nprivileeed 
account attempts to chain to a .BAS (non-compil-d) progran, no 
Messages are g@iven but tne chain never occurs; the NONANE 
program is set up instead. 


DISPOSITION: The following patch corrects the problem, 


1. This is a paten to tne BASIC-PLUS Run-tine System, It should 
be mad= on all VO6OA-O02 sSystens. 


Cx Obtain a listing of the BASIC load map. This map is printed 
during system ceneration if a line printer is available. 
Otherwise the map must be printed from the LICIL tape created 
during SYSGEN (DECtape or mactanoe distribution) or from the 
System Generation DECpack (RK distribution). rf the 
distribution medium is DECtape= or maztape, print the file 
BASIC.MAP from the LICIL tape using any DOS monitor. If the 
distribution mediun is RX disk cartridge, use extended PIP 
under RSTS with the /DOS switch to print the file BASIC.MAP 
from aceosunt [1,2] on the System Generation DECpack used for 
your system generation. Alternatively, bootstrap the System 
Generation DeCpack, log into the DOS/BATCH monitor with the 
LO 1,1 command, and use PIP under DOS to print the map file. 


Si On the first page of the BASIC map under the heading "Program 
Seetion Allocation Synopsis" find the seetion <SU> and record 
the first number to the right of the section name (first 
column of numbers). 


<SU> = 


q, Bootstrap tne KSTS/E system disk normally to load the 
initialization code into memory. Then us# the PATCH option 
of tne INIT code to install tne following patch. 


OPTION: PATCH 
MOBULE? BASIC 
BASE ADDRESS? (SU) 
OFFSET ADDRESS? 52 


MODULE BASE OFFSET OLD NEW? 
BASIC (SU) 000052 o60400 ? 064400 
BASIC (SU) 000054 XXXXXX ? <LF> 
BASIC (SU) 000056 026627 ? tc CTRL/C Exit 
OPTION: 
RSTS/E BASIC-PLUS Seq 3.1.11* 


BASIC-PLUS PATCHES lof 1 


RSTS/E Software Dispatch 
June 1976 


HbtiORY MANAGEMENT VIOLATIONS USING SPACE$ 


PROBLEM: The SPACE$ function will cause a memory manazement vio- 
hation if its arzunent is 32767%+1% (integer minus zero). 


DISPOSITION: This patch correets the problem. 


1. Tnis is a patch to the BASIC-PLUS Run-tim- System. It should 
be made on all VO6OA-02 systems. 


2. Obtain a listing of the BASIC load man. This map is. vrinted 
during system feneration if a line printer is available. 
Otherwise the map must be printed from the LICIL tape created 
during SYSGEN (DECtape or magtape distribdution) or from the 
System Generation DECpack (RK distribution). If the distri- 
bution medium is DECtap# or magtape, print the fils BASIC.MAP 
from the LICIL tap- using any DOS monitor. If the distribu- 
tion medium is RK disk cartridge, use extended PIP under RSTS 
with the /DOS switen to print the file BASIC.MAP from account 
{1,2] on the System Generation DECpack used for your system 
Zeneration. Alternatively, bootstrap the Syste Generation 
DECpack, log into the DOS/BATCH monitor with the LO 1,1 com- 
mand, and use PIP under DOS to print the map file. 


3. On the first page of the BASIC map under the heading "Program 
Seetion Allocation Synopsis" find the seetion <RC> and record 
tne first number to the right of the section name (first coe 
lumn of numbers). 


<RC> = 


4. Bootstrap the RSTS/E systen disk normally to load the ini- 
tialization cod+ into memory Tnen us# the PATCH option of 


the INIT cods to install the following pateh. 

OPTION: PATCH 

MODULE? BASIC 

BASE ADDRESS? (RC) 

OFFSET ADDRESS? 12014 

MODULE BASE OFFSET OLD NEW? 

BASIC (RC) 012014 100435 ? 002435 

BASIC (RC) 012016 110223 ? fC CTRL/C Exit 

OPTION: 
RSTS/E BASIC-PLUS Seq 3.1.12* 
BASIC-PLUS PATCHES 1 of 1 
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REDIMENSIONING CAUSES ERRORS (SPR 11-5798 JC) 


Redimensioning arrays may cause memory management errors and UNIBUS 
timeouts. 


The following patch alleviates the problem. 


ds 


2. 


3a. 


3b. 


This is a patch to the BASIC-PLUS Run Time System. It should 


be made on all VO06A-02 systems. 


Obtain a listing of the BASIC load map. This map is printed 
during system generation if a line printer is available. Other- 
wise the map must be printed from the LICIL tape created during 
SYSGEN (DECtape or magtape distribution) or from the System 
Generation DECpack (RK distribution). If the distribution medium 
is DECtape or magtape, print the file BASIC.MAP from the LICIL 
tape using any DOS monitor. If the distribution medium is RK 
disk cartridge, use extended PIP under RSTS with the /DOS switch 
to print the file BASIC.MAP from account [1,2] on the System 
Generation DECpack used for your system generation. Alternatively, 
bootstrap the System Generation DECpack, log into the DOS/BATCH 
monitor with the LO 1,1 command, and use PIP under DOS to print 
the map file. 


On the first page of the BASIC map under the heading "Program 
Section Allocation Synopsis," find the section <TR> and <PA>; 
record the first number to the right of the section name (first 
column of numbers). 


i] 


<TR> 


<PA> = 


Find under module RC the global symbol THENT 


<THENT> = 
Bootstrap the RSTS/E system disk normally to load the initiali- 
zation code into memory. Then use the PATCH option of the INIT 
code to install the following patch. 


OPTION: PATCH 

MODULE NAME? BASIC 
BASE ADDRESS? [TR] 
OFFSET ADDRESS? 11519 


MODULE BASE OFFSET OLD NEW? 

BASIC [TR] 11512 994767 2894737 

BASIC [TR] #11512 XXXXXX ?{PA] +192 

BASIC [TR] g1isi4 g1lg4opg ?+C CTRL/C EXIT 


RSTS/E BASIC-PLUS V06A-02 
BASIC PATCHES 


Seq 3.1.13* 
1 of 2 


OPTION: PATCH 
MODULE NAME?BASIC 
BASE ADDRESS?[ PA] 
OFFSET ADDRESS?192 


MODULE BASE OFFSET OLD NEW? 
BASIC [PA] 192 g 2942737 
BASIC [PA] 194 g ?PP L290 
BASIC [PA] 166 g PASI66H 
BASIC [PA] 11¢ 2 2913794 
BASIC [PA] 112 g 2098674 
BASIC (PA] 114 g 2095964 
BASIC [PA] 116 g 2B 89524 
BASIC [PA] 129 g 2090137 
BASIC [PA] 122 g ?{THENT] 
BASIC (PA] 124 g ?+C CTRL/C EXIT 


This patch disables continuation after redimensioning. All variables 
are set to null or zero. The program may then be rerun. 


RSTS/E BASIC-PLUS V06A-02 Seq 3.1.13* 
BASIC PATCHES 2 of 2 
July 1976 
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RSTS/E Software Dispatch, July 1976 


REPLACE MAY DELETE A PROGRAM WITHOUT REPLACING IT (SPR 11-6722 JC) 


The sequence of events during a REPLACE is as follows: 


1. REPLACE ascertains that a file with the same name exists on the 
storage medium. 


2. If the file exists, it is given a length of @ (providing patch 
3.1.1 has been installed). Giving it a length of @ essentially 
deletes the contents of the file on the storage medium. 


3. A buffer, in the user area, is allocated and the new version of 
the program is written to the storage medium. The length is 
modified to agree with the new program length. 


The problem occurs when there is not enough room in the user memory 
area for both the program and the buffer allocation. Under this 
circumstance, steps 1 and 2 above are completed, but step 3 is not. 
The error MAXIMUM CORE EXCEEDED is printed on the terminal, result- 
ing in the contents of the file being deleted on the storage medium 
but the new version of the program is not written into the file. 


This problem cannot be patched. However, there are two methods to 
alleviate the problem. Method 1 is to be used in lieu of REPLACE 
when it appears no other problems exist and method 2 is to be used 
only when the error message MAXIMUM CORE EXCEEDED was generated be- 
cause too much space was used in array or buffer allocation. 

1. Use of SAVE and RENAME 


Assume that a program called PROG1 is to be edited. 
Follow this procedure. 


OLD PROGL 

RENAME PROG2 

perform edits and then 
SAVE 


thus allowing PROG2 to be written in its entirety to 
storage medium. PROG] remains as backup. 


RSTS/E BASIC-PLUS V06A-02 Seq 3.1.14 
BASIC PATCHES 1 of 2 


14g 


Editing STOP into the program. 


a. 


b. 
c. 


d. 


Edit STOP into the program, as the first line of 
the program. 


RUN program 


REPLACE 


If MAXIMUM CORE EXCEEDED appears again, the program is indeed 
too large. Some of the program must be deleted in order to 
SAVE it. 


RSTS/E BASIC-PLUS V06A-02 
BASIC PATCHES 2 of 2 


Seq 3.1.14 


July 1976 


SOFTWARE DISPATCH RSTS /e 


COMPILED PROGRAM INCOMPATIBILITY 


All BASIC-PLUS programs created under RSTS/E V05-21 must be recompiled 
before they can be used under RSTS/E VO6A-02. Programs created under 
RSTS/E VQ5B-24 do not require recompilation. The intermediate code 
created by the BASIC-PLUS compiler changed slightly between vV05-21 and 
VO5B-24. Hence, the recompilation was necessary when upgrading from 
version V05-21 to VO5B-24 and is necessary when upgrading from version 
vV05~-21 to VO6A-02. There was no change in code from version VO5B-24 
and V05C-01 to VO6A-02. 


Whenever the intermediate code created by the BASIC-PLUS compiler is 
changed, the BASIC-PLUS version number stored in the compiled image 

is also changed. As noted above, the BASIC-PLUS version did not change 
from RSTS/E VO5B-24 to V05C-01 and from V05C-01 to VO6A-02. The Run 
Time System verifies the BASIC-PLUS version number when a compiled 
image (.BAC file) is loaded for execution. Any attempt to run a .BAC 
file compiled under a previous BASIC-PLUS version results in a PROGRAM 
LOST SORRY message. 


The requirement to have compatible BASIC-PLUS versions does not affect 
new installations since all programs are normally developed using 

RSTS/E VO6A-02. Similarly, installations upgrading from V0O5B-24 or 
vV05C-01 to VO6A-02 are not affected. Only those installations upgrading 
from RSTS/E V05-21 to VO6A-02 require the recompilations. 


SOFTWARE PRODUCT VERSION 
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COMPONENT VERSION 
BASIC-PLUS Notes N/A 
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February 1973 


Source Level Statements in BASIC 


PROBLEM: 


Source level statements in BASIC may occasionally be ambiguous 
because the definition of the language excludes elemental deli- 
miters. 

SOLUTION: 


The following are examples of language ambiguities. 


1. PRINT X FOR X=S TO P 
fails to compile but 
PRINT X FOR X=(S) TO P 
circumvents the ambiguity. 


2. PRINT IF OR I=l TO 19 
compiles as 
PRINT I FOR I=1 to 1¢ 


3. PRINT P IF OR I=l1 TO 5 
compiles as 
PRINT PI FOR I=l TO 5 


SOFTWARE PRODUCT 
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Notes/Programming Hints 
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Simultaneous Access to a File by Many Users 


PROBLEM: 


It is desirable to allow an entire group to access a file for reading 
data but only one of the group to be able to write in it. 


SOLUTION: 


It is suggested that the file be given a Protection Code of <6¢> 
and that a privileged program be provided that uses UPDATE mode 
but never writes in the file, only reads it. The actual updating 
of the file would be done by a nonprivileged program on the owner 
account, again using update mode. 
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Passing EOT Mark on Magtape 


PROBLEM: 


Passing the EOT (End Of Tape) mark on magtape gives an error but does 
not write an End Of File. This causes problems in the future reading 
of that tape. 


SOLUTION: 


RSTS makes no assumptions about how the user is using a magtape. An 
error is given indicating the occurrence of End Of Tape while writing. 
This error is trappable, and the user can write trailing information 
onto the tape at this time. One then should close the file, which will 
write three End-Of-File marks. 


If the user's program does not trap the error (no ON ERROR GOTO), then 
when his job returns to READY he should execute an immediate mode 
CLOSE or END statement to cause the EOFs to be written. 
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October 1973 


An ON ERROR GOTO with an Incorrect Target Statement Number 


PROBLEM: 


An ON ERROR GOTO with an incorrect target statement number can cause 
confusing error messages. 


SOLUTION: 


When a BASIC-Plus program executes an ON ERROR GOTO 499% statement, 
it, in effect, says, "If any trappable error occurs, execute a GOTO 


4999." 


If, when the error oocurs in line 145% of the program, there is no 
line 489%, a non-trappable error causes the message: 


STATEMENT NOT FOUND AT LINE 1459 


to be printed. This happens because the previous ON ERROR GOTO 
coupled with a trappable error is exactly equivalent to line 1459 
having contained a 


GOTO 4099 
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November 1973 


INPUT Giving Confusing Results 


PROBLEM: 


INPUT gives confusing results when variable names longer than those 
which are valid are used. For example: 


INPUT ROWS ,COLS 


SOLUTION: 

INPUT does not require commas between variables in cases where there 
is no ambiguity. If, however, a recognizable BASIC-PLUS command is 
contained in the argument list, a syntax error will result. 

Above example is treated the same as: 


INPUT R,O,W,S,C,0,L,S 


although INPUT ABCDEF would give syntax error because of the DEF 
contained in it. 
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SOFTWARE DISPATCH cin 


November 1973 


Floating Point Numbers That Appear to be Equal 


PROBLEM: 


Floating point numbers that appear to be equal and even print the 
same to many significant digits sometimes convert to different 
integer values when truncated. 


SOLUTION: 


Many decimal values cannot be represented exactly in binary, no 

matter how much precision. Numbers, when printed, are rounded to 

the number of digits printed; therefore, they can actually be slightly 
smaller than the value printed. If, for example, the number printed 
as 7371.08 is actually slightly less than that, perhaps 7378.9999, 

the integer equivalent, will be 7378 rather than 7371 as expected. 
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Setting VT@5 for UP (?)CURSOR (SPR 11-4987) 


PROBLEM: 


The "up cursor" key of a VTO5B produces a CTRL/Z that is undesirable 
when a user wants cursor control. 


DISPOSITION: 


If a VTO5B is set up with STTYSET as a VTO5 or SET SCOPE then output 
(computer to terminal) of CHR$(026) will cause a "cursor up." If 
input (terminal to computer) of the cursor key is desired, the 
program should then use "single character mode" which is invoked by 
executing .SYS(CHR$(4)), The input handling of 02619 is specifically 
changed as follows. 


CHRS () NORMAL SINGLE CHARACTER 
026 EOF (and trap error) Cursor up (no error trap) 
177 CHARACTER DELETE Passed to program 
021 LINE DELETE Passed to program 


This allows a user much more control over the display format. 
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September 1975 


SOFTWARE DISPAICH 


SCALE Factors for VO6A-02 


SUGGESTIONS : 


1. RUNning a program (.BAC) does not alter the job SCALE 
factor as set by SCALE n. The compiled program runs with 
the factor it was compiled with. VO6A~02 documentation 
reflects this change. 


2. An installation note defines the process that allows the 
system manager to patch BASIC so that any SCALE factor 
(@ to 6) can be the LOGIN-time default value. 
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RSTS/E Software Dispatch 
January 1976 


Obtaining Job Number Using the PEEK Function 


The correct method for obtaining your job number using 
PEEK is: 


Jé=(PEEK(518%) AND 255%) /2% 


The PEEK of 518% returns your job number times 2 in 
the low byte and the job number times 2 of the job to 
run next in the high byte. To obtain your job number, 
the low byte must be extracted and the result divided 
by 2. 
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February 1976 


Program Lost-Sorry Messages 


There have been several questions related to PROGRAM 
LOST-SORRY message on RSTS/E VO6A-02. In most cases, 
this message is preceeded by another message which 
gives the reason for the abort. For example: 


DISK ERROR DURING SWAP 
PROGRAM LOST-SORRY 


In VO6A-02, there are four cases in which the PROGRAM 
LOST-SORRY message will not be preceded by a 
qualifying message. These conditions are discussed 
below with appropriate recommendations. 


Le Checksum Error on a .BAC File 


When a BASIC-PLUS program is compiled, a checksum is 
computed and written out to disk as part of the .BAC 
file. On all subsequent loads of the .BAC file (RUN 
or CHAIN), a checksum is recomputed by the BASIC-PLUS 
Run Time System and is compared with the checksum 
stored in the .BAC file. If the computed and stored 
checksums do not agree, execution is aborted, an error 
is logged, and the PROGRAM LOST-SORRY message is 
returned to the user. Aborts caused by checksum 
mismatch are always accompanied by a corresponding 
ehecksum error being logged, provided, of course, that 
ERRCPY is running and that the error limit of 100 
entries for this type of error has not been exceeded. 


SOFTWARE PRODUCT VERSION 


RSTS/E BASIC-PLUS V06A-02 
COMPONENT VERSION 
NOTES/PROGRAMMING HINTS N/A 
SUBPROGRAM OR ADDITIONAL INFORMATION SEQUENCE PAGE 
3.2.11*| 1 OF 5 


NEW REPLACEMENT ARTICLE ORIGINAL DATE 
[J February 1976 


160 


RSTS/E Software Dispatch 
February 1976 


Program Lost-Sorry Messages 


Checksum errors can be caused by hardware malfunction 


or by intentional or accidental modfication of a .BAC 
file. Some of the hardware possibilities are: 
1. A disk read error which is not detected by the 


disk error detection logic (extremely rare). 


2. A disk write error where memory data was 
incorrectly recorded on disk due to a bus 
transmission error. In this case, the disk 
correctly writes the data presented to it and 
therefore no error is detected on a read. 

3. Undetected memory parity errors, either from 


non=-parity memory or one of a class of multiple 
bit errors which are not detected by memory parity 
hardware. 
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RSTS/E Software Dispatch 
February 1976 


Program Lost-Sorry Messages 


RSTS/E does not have specific protection to prevent 
alteration of a compiled image. A checksum mismatch 
can be caused by accidentally or intentionally opening 
and writing into a .BAC file. 


Recompilation will normally correct this problem for a 


particular program. However, frequent checksum errors 
indicate disk, memory, bus, or system problems, faulty 
application software; or malicious destruction of 


compiled files. 


LI. Disk Error on Read of a .BAC File 


An unrecoverable disk error during the load of a .-BAC 
file will also result in a PROGRAM LOST-SORRY message. 
In this case, a disk read error will be logged. 


Unrecoverable read errors can be caused by bad disk 
sectors, dust, or a transient hardware problem in the 
disk subsystem. If the disk sector is not bad, 
rewriting the failing sector will frequently correct 
the problem. It is safer, however, to rename the .BAC 
file and leave it on disk to insure that the sector is 
not reused. This will avoid future problems in the 
ease of a disk sector which is permanently bad. 
Recompile the program from the .BAS file for normal 
use. 
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RSTS/E Software Dispatch 
February 1976 


Program Lost~-Sorry Messages 


III. Unreasonable .BAC File Size 


Special care must be exercised when a .BAC file (or 


any binary file) is copied with PIP. The /BL, /CO, 
and /CO:T switches must be used to prevent a change in 
file size and to preserve .BAC file integrity. The 


Size of a .BAC file (as indicated by DIRECT or PIP 
directories, or the CATALOG command) must obey the 
following relations: 
8 < SIZE+1 < 64 i.e. 2K to 16K 

and 


((SIZE+1) .AND. 3)=0 i.e SIZE+1 is a multiple of 4 


A PROGRAM LOST-SORRY messages caused by improper .BAC 
file size is always repeatable but is not accompanied 


by an error being logged. It is easily fixed by 
recompiling the program from the .BAS file. To avoid 
the problem, the appropriate PIP operation should be 
used in any transfer of a -BAC file or any binary 
file: 

MTn: FILE.BAC < DISK:FILE.BAC/BL Disk to Magtape 

DISK: FILE.BAC < MTn:FILE.BAC/BL Magtape to Disk 
DTn: FILE.BAC < DISK:FILE.BAC/CO Disk to Dectape 

DISK: FILE.BAC < DTfn:FILE.BAC/CO:T Dectape to Disk 

DISK: FILE.BAC < DISK:FILE.BAC/BL Disk to Disk 
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Program Lost-Sorry Messages 


IV. Mismatch of BASIC-PLUS Version Number 


Whenever the BASIC-PLUS compiler is changed to produce 
different intermediate code, the version number stored 
by the compiler in the compiled image is also changed. 
The version number is checked by the BASIC-PLUS- Run 
Time System on each RUN or CHAIN to a .BAC file. A 
PROGRAM LOST-SORRY message will result if the version 
number stored in the compiled image does not match the 
version number of the running BASIC-PLUS system, 
indicating that the image was created by an 
incompatible version of BASIC-PLUS. 


The intermediate code (and the BASIC-PLUS version 
number) changed between V05-21 and VO5B-24 of RSTS/E. 
The intermediate code did not change from VO0O5B-24 to 
VO5C-01 or from VO05C-01 to VO6A-02. Thus any attempt 
to run a .BAC file created on V05-21 will fail on 
VO5B-24, VO5C-01, or VO6A-02. Furthermore, BASIC+¥PLUS 
produces different code under the 2-word and 4-word 
math packages. Thus, recompilation is necessary if 
the math package changes, even under the same version 
of RSTS/E. This error is repeatable but is not 
accompanied by any error being logged. The program 
must be recompiled from the .BAS file. 


Refer to RSTS/E VO6A-02 Software Dispatch Article 
#3.2.1 for additional information on compiled program 
compatibility. 
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True-False Values and the NOT Operator (SPR 11-6119 TT) 


PROBLEM: 


The logical NOT can produce a true value for NOT V% when V% is 
true. 


SOLUTION: 


In BASIC-PLUS, logical values are represented by integers. §%% is 
used to indicate false, and any nonzero value indicates true. The 
logical NOT operator performs a bit-wise complement of the expres- 
sion which follows it. Hence, NOT V% = ~-1% when V% = #%(false) and 
NOT V% = $% when V% = -1%. For any nonzero (true) value V% not 
equal to -1%, NOT V% is also nonzero, hence true. The existence 

of multiple true values generally is transparent to the user since 
all relational operators (=, <, >, <=, >=, <>) use -1% for true. 
Hence, NOT (A% < B%) is either %% or -1%. It is advisable to use 
expressions such as NOT V% only when V% has the values %% or -1%, 
or when the logical complement of V% is desired. 
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December 1975 


Floating Point Anamolies 


PROBLEM: 


There is a discrepancy between the internal representation of 
floating point numbers and their representation when printed 
with the PRINT statement or converted to a string with the NUMS 
function. An example follows: 


1¢ I=.59 
20 J=106*.59 
30 I= 
46 PRINT I,J,1% 
5¢ END 
READY 
RUNNH 
59 59 58 
READY 


DISPOSITION: 


The discrepancy is due to the fact that it is impossible to pre- 
cisely convert any decimal number whose fractional part is not the 
reciprocal of a power of two. BASIC-PLUS uses the closest approxi- 
mation possible. Hence, in the above example, .59 is represented 
by a binary number slightly less than 59. Step 30 removes the 
fractional part of J and stores the result (58) in I%. In step 
40, the PRINT routine determines the values stored for I and J 

are actually approximations for .59 and 59, and hence prints .59 
and 59. (The NUM$ function behaves identically.) However, the 
value 58 is printed for I% due to the truncation performed in 

step 30. 
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December 1975 


Floating Point Anamolies 


To eliminate such discrepancies, the user should add a small frac- 
tion to a floating point number before conversion to an integer. 
In the following example, step 30 has been changed. Step 40 
prints 59 for J and I. 


30 I%=J+.5 
RUNNH 

-59 59 59 
READY 


SOFTWARE PRODUCT VERSION 
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August 1975 


Manipulation of Virtual Strings Containing Null Bytes 


PROBLEM: 


Manipulation of virtual strings containing null bytes may produce 
unexpected results. In particular, 


A$ (1) CVT%S$ (512%) 
BS A$ (1) 


Where AS$(1) is a virtual string causes BS to have a length of l. 
SOLUTION: 


4 


Virtual strings are stored in their correct length slots and 

filled out with zero bytes. When a virtual string is retrieved, 

the length is determined by examining the bytes from the end of the 
slot toward the beginning of the slot. The first nonzero byte 

is assumed to be the end of the active data in the string. CVT%S (512%) 
generates a string whose second byte is zero and when BS is assigned 
its value, the active data in AS(1) is computed to consist of one 
byte. 


It should be noted that the virtual string facility is intended for 
use aS a storage mechanism for meaningful character data. 


NOTE: CVTS%(B$) will still be equal to 512% since CVTS%( ) and CVTSF( ) pad 
short strings with nulls. 
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April 1975 


Possibility of Zeroing An Account 
ae Se ee SAC COURE 


PROBLEM: 


When using BACKUP to transfer from disk to magtape, it is possible 
to zero out an account on the disk by issuing a command as follows: 


#MTP< [ 2068, *]/Z/L 


SOLUTION: 


This problem is too complex to patch. The problem will be fixed in 
the next release of BACKUP following the V@6A-92 release. 


SOFTWARE PRODUCT VERSION 
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COMPONENT VERSION 
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June 1975 


Backing Up RP§3 or RP#4 


PROBLEM: 

SBACKUP takes an unusually long time to back up large (RPZ3 and 

RP@4) disk packs. 

SOLUTION: 

A new BACKUP package is currently under development. It will not be 

a part of the RSTS/E V@6A-$2 release but a separate package. Notification 
of availability will appear in the Software Dispatch. 

Until then, follow these suggestions: 


1. Do BACKUPS stand-alone, if possible. 


2. Keep accounts as clean as possible (delete .TMP files, zero 
unused accounts, etc.) 


3. Upgrade to RSTS/E V%6A-G2 when it becomes available, and use the 
REORDR program regularly to reorder accounts. Use the extended 
PIP in V$6A-%2 to back up, zero, and restore the accounts. 


These procedures will help to keep the directories neat. 
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January 1976 


Backup Public-To-Public Disk Transfers 


Several BACKUP SPRs have been received indicating a 
problem when attempting to transfer files from one public 
disk to another public disk. BACKUP does not support this 
operation. 


In generai, unless the documentation states that an 
operation is valid, then it is not valid and hence 
unsupported. In the case of BACKUP, the User Manual makes 
no reference to publiec-to-public transfers. 


The purpose of BACKUP is to preserve on-line files 
off-line and then to restore these files in the event that 
the on-line copy is destroyed. BACKUP was not designed to 
handle file tranfers within the public structure. 
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BACKUP Clustersize Errors 


PROBLEM: 


A system BACKUP is in progress using the programs 
BACKUP and BACKDK. At the end of the first tape, a 
file from DB: will not fit on the tape. So, BACKUP 
Spaces. the tape to the last filemark, and logically 
closes the tape. 


It then requests the operator to mount a new tape, and 
having done so, the operation continues. The file 
which would not fit the previous tape gets saved to 
this second tape. However, the clustersize for this 
file when restored to disk turns up as clustersize-2. 


PREREQUISITES: 


The VO6A+02 version of BACKUP or BACKDK. 


PROCEDURE: 


1. Log into the system under the account [1,2], the 
system library account. 


2. Mount the system library source medium on ae free 
unit and bring the drive to a READY state. 


Copy of DEC-]1-ORSLA-C-HA disk (RK) 
DEC-1]-ORSCA-D-UA3 Large Programs DECtape 
DEC-11-ORSLA-D-MA7 magtape (7-track) 
DEC-11-ORSLA-D-MAQ magtape (9-track) 


SOFTWARE PRODUCT VERSION 
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BACKUP Patches 4.2,.4* 


PAGE 
1 OF 3 


NEW REPLACEMENT ARTICLE ORIGINAL DATE 


[x ] [ February 1976 


172 


RSTS/E Software Dispatch 
February 1976 


BACKUP Clustersize Errors 


2A. (RK distribution only) 
Mount the copy of the System library using the 
UTILITY program and label SYSLIB. 

3. Bring the BACKDK source program into memory with 
the command: 
OLD XX:BACKDK XX=DTn for DECtape 


=MTn for magtape, and 
=DKn for disk cartridge. 


READY 


SOLUTION: 
Modify line 12000 of program BACKDK.BAS as follows: 
13 Remove statement: 

F8Z=FO%-1% 


2. Modify CHR$(F8%) to read CHR$(F8%-14%). 
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February 1976 


Backup Clustersize Errors 


Line 12000 should now read 

09:29 AM 21-Nov-75 

S$="": S$=S$+CHR$(FS(1%4)) FOR I%=7% TO 124%: S$=S$+CHR$(N5%)+ 
CHR$(N6%)+CHR$(F4%)+CHR$(F8S-1%)+CVTS$(SWAPS(F6%) )+CVTZ$(F34): 


FIELD #2%, B2é AS O$: LSET O$=S$: PUT #2%, COUNT 14%: RETURN 
! CREATE AND PUT MAGTAPE FILE HEADER 


Recompile the program onto the system library with the 
command: 


COMPILE SYO:BACKDK 


If the source (.BAS) file is to be saved also, type 
the command: 


REPLACE dev:BACKDK( account) 


NOTE: Do not replace BACKDK.BAS on the original 
distribution medium. 


BACKDK subsequently executes properly. 
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Retaining Original Creation Dates with BACKUP 


PROBLEM: 

When restoring files from Magtape, BACKUP fails to 
retain the original file creation date. 

PREREQUISITES: 


The VO6A-02 version of BACKUP or BACKDK. 


PROCEDURE: 


7. Log into the system under the account [1,2], the 
System library account. 


2. Mount the system library source medium on a free 
unit and bring the drive to a READY state. 


Copy of DEC-11-ORSLA-C-HA disk (RK) 
DEC-11-ORSCA-D-UA3 Large Programs DECtape 
DEC-11-ORSLA-D-MA7 magtape (7-track) 
DEC-11-ORSLA=D-MAQ9 magtape (9-track) 


2A. (RK distribution only) 


Mount the copy of the System library using the 
UTILITY program and label SYSLIB. 
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Retaining Original Creation Dates with BACKUP 


3. Bring the BACKDK source program into memory with 
the command: 


OLD XX:BACKDK XX=DTn for DECtape 
=MTn for magtape, and 
=DKn for disk cartridge. 


READY 


Solution: 


On line 20105 change the last two unequals (<>) to 
equals (=). 


Line 20105 should now read. 


BACKDK 09:30 AM 21-Nov-75 
20705 IZ=MAGTAPE(2%,A0%,2%) IF G3% AND 4f: 
: X$=FNDZ(1%) UNLESS S7% OR G1% AND -2%: 
IFG3$=1SANDG]SANDSSANDBS<> AOZANDS7S=AOSANDVS=AOSANDAS=AOZTHEN X4=FNDS(25) 


! RESET FILE ACCESS STATISTICS IF NECESSARY 
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Retaining Original Creation Dates with BACKUP 


Recompile the program onto the system library with the 
command: 


COMPILE SYO:BACKDK 


If the source (.BAS) file is to be saved also, type 
the command: 


REPLACE dev:BACKDK( account) 


NOTE: Do not replace BACKDK.BAS on the original 
distribution medium. 


BACKDK subsequently executes properly. 
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BACKUP Fails to Retain Protection Code 


PROBLEM: 

While running under a privileged account, [1,x] 
BACKUP fails to retain a protection code of <64>. 
PREREQUISITES: 


The VO6A-02 version of BACKUP or BACKDK. 


PROCEDURE: 


1. Log into the system under the account [1,2], the 
system library account. 


2. Mount the system library source medium on a. free 
unit and bring the drive to a READY state. 


Copy of DEC-11!-ORSLA-C-HA disk (RK) 
DEC-11-ORSCA-D-UA3 Large Programs DECtape 
DEC-11-ORSLA-D-MA7 magtape (7-track) 
DEC-11-ORSLA-D-MA9 magtape (9-track) 


2A. (RK distribution only) 


Mount the copy of the System library using the 
UTILITY program and label SYSLIB. 
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BACKUP Fails to Retain Protection Code 


3. Bring the BACKDK source program into memory with 
the command: 


OLD XX:BACKDK XX=DTn for DECtape 


=MTn for magtape, and 
=DKn for disk cartridge. 


READY 


SOLUTION: 
On line 1910 change modifier 
P4S>64% 
to: 
F4Z>634 
Line 1910 should then read: 
BACKDK 09:30 AM 21-Nove75 
1910 ONERRORGOTON20000:GOSUBI2000IFG3ZAND4G: 
RIZ=AOZ:GOTOZZ00IFVE: 
IF(G1ZAND5%) ®(G3ZAND1%) THEN 
NAMEA$+S9OS$4+N$ASN$SIFFYS>63¢EANDS72Z=A08: 
PUT#2%,RECORDF3%,COUNT5122: 


OPENA$+S9$+N$ASFILE2%,RECORDSIZEB24 
!WRITEMAGTAPELABEL; CHECKDISK-TO-DISK 
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BACKUP Fails to Retain Protection Code 


Recompile the program onto the system library with the 
command: 


COMPILE SYO:BACKDK 


If the source (.BAS) file is to be saved also, type 
the command: 


REPLACE dev: BACKDK( account) 


NOTE: Do not replace BACKDK.BAS on _ the original 
distribution medium. 


BACKDK subsequently executes properly. 
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BACKUP Detach Problem 


PROBLEM: 


When running BACKUP to magtape, detached and using the 
/Z switeh, there is a problem when a second tape is 
involved. After asking for the second tape to be 
mounted, BACKUP detaches and immediately goes into 
hibernate state. When you attach to the job it prints 
"REALLY ZERO MTO:?" Once you answer YES, it again 
detaches. The BACKUP (or BACKDK) program should first 
ask the question about zeroing the magtape and then 
detach. 


PREREQUISITES: 


The VO6A-02 version of BACKUP or BACKDK. 


PROCEDURE: 


1. Log into the system under the account [1,2], the 
system library account. 


2. Mount the system library source medium on a free 
unit and bring the drive to a READY state. 


Copy of DEC+-1]-ORSLA-C-HA disk (RK) 
DEC-11-ORSCA-}D-UA3 Large Programs DECtape 


DEC-]1-ORSLA-D=-MA7 magtape (7-track) 
DEC-11-ORSLA-D-=MA9 magtape (9-track) 
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BACKUP Detach Problem 


2A. (RK distribution only) 


Mount the copy of the System library using the 
UTILITY program and label SYSLIB. 


3. Bring the BACKDK source program into memory with 
the command: 


OLD XX:BACKDK XX=DTn for DECtape 


=MTn for magtape, and 
=DKn for disk cartridge. 


READY 


SOLUTION: 
On line 21010 remove the statement which reads: 
GOSUB 28600 


Line 21010 should then read: 


BACKDK 09:30 AM 21-Nov-75 

21040 Z¢=-1% :GOSUB 28000 : 
INPUT "NEXT MAGTAPE UNIT #";2% WHILE Z%<AO%-OR 2%>7% : 
SO$S="MT"+CHRS(48Z4+72%)47:": Wh=C(WS AND ~5%) OR 4%: 
GOTO 750 
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BACKUP Detach Problem 


Recompile the program onto the system library with the 
command: 


COMPILE SY0O:BACKDK 


If the source ({.BAS) file is to be saved also, type 
the command: 


REPLACE dev: BACKDK( account) 


NOTE: Do not replace BACKDK.BAS on the original 
distribution medium. 


BACKDK subsequently executes properly. 
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BATCH Does Not Work with Decimal Arithmetic (SPR 11-5782) 


PROBLEM: 
BATCH will not work correctly with the Decimal Arithmetic BASIC- 


PLUS math package developed as part of the RSTS/E Commercial 
Extensions. 


SOLUTION: 
All references to 
1,E1¢ 
in BATCH should be replaced by 


1f £66 228 BA 


if Decimal Arithmetic is being used. 
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CREF Goes Into an Infinite Loop 


PROBLEM: 


If.the variable ERL appears at the end of a BASIC PLUS line, 
CREF goes into an infinite loop. 


SOLUTION: 


The following patch fixes the problem. 


PREREQUISITES: 


None. 


PROCEDURE : 


Log into the system under the account [1,2], the system 
library account. 


Mount the system library source medium On a free unit = and 
bring the drive to a READY state. 


Copy of DEC-11-ORSLA-C-HA disk (RK) 
DEC-11-ORSCA-D-UA3 Large Programs DECtape 
DEC-11-ORSLA-D-MA7 magtape (7-track) 
DEC-11-ORSLA-D-MA9 magtape (9-track) 


2A. (RK distribution only) 


Mount the copy of the System library using the UTILITY 
program and label SYSLIB. 
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3. Bring the CREF source program into memory with the command: 


OLD XX:CREF XX=DTn for DECtape 
=MTn for magtape, and 
=DKn for disk cartridge. 


READY 


Type the following lines: 


320 PZ=P4+LEN(E$(J%))-1% : IF J4>5% OR M% THEN 260 
ELSE IF J#=5% 
THEN P%=P%+1% WHILE INSTR(1%,"<>=",MID(Z$,P%,I%)) AND 
(P4<=LEN(Z$)) 
Recompile the program onto the system library with the command: 


COMPILE SYO:CREF<40> 


If the source (.BAS) file is to be saved also, type the 
command: 


REPLACE dev:CREF( account) 


NOTE: Do not replace CREF.BAS on the original distribution 
medium. 


CREF subsequently executes properly. 
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Using Wildcard Commands with DIRECT 


PROBLEM: 

There is a problem with the version of DIRECT released 
with RSTS/E VO6A-02. When calling for a directory 
with a wildeard specification, on a system using 
multiple system/public disks, some accounts) are 
reported inaccurately. In certain cases, files from 
the last device of the last account listed will be 
printed along with any files that actually belong to 
the account. 

SOLUTION: 


The following modification corrects this problem. 
PREREQUISITES: 


The version of DIRECT that was released with RSTS/E 
VO6A-02. 


PROCEDURE: 


SOFTWARE PRODUCT VERSION 
RSTS/E UTILITIES VO6A-02 
COMPONENT VERSION 
DIRECT N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION SEQUENCE PAGE 
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Using Wildcard Commands with DIRECT 


2. Mount the system library source medium on a free 
unit and bring the drive to a READY state. 


Copy of DEC-11-ORSLA-C-HA disk (RK) 
DEC-11-ORSCA-D-UA3 Large Programs DECtape 
DEC-1t1-ORSLA-D-MA7 magtape (7-track) 
DEC+#11-ORSLA-D-MAQ magtape (9-track) 


2A. (RK distribution only) 


Mount the copy of the System library using the 
UTILITY program and label SYSLIB. 


ee Bring the DIRECT source program into memory with 
the command: 


OLD XX:DIRECT XX=DTn for DECtape 


=MTn for magtape, and 
=DKn for disk cartridge. 


READY 


SOFTWARE PRODUCT VERSION 
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Using Wildcard Commands with DIRECT 


Type the following lines: 


tiit! DIRECT VERSION O6A EDIT 2 10/31/75 

2100 OPEN D$+U$ FOR INPUT AS FILE 1% 
:GOTO 2080 UNLESS PEEK(PEEK(PEEK(PEEK(5202%) )+2%)+4%) 
>F%=U%$(31%,0%) 
2:BE,UA=0% 
:GOTO 2270 IF S% AND 8192% 
!OPEN UFD, SKIP IF NULL, GET CLUSTER, INIT POINTER 
!'SKIP IF BACKWARDS LIST 


Recompile onto the system library with the command: 


COMPILE SYO:DIRECT 


Name the program with a privileged protection with the 
command: 


NAME "DIRECT.BAC" AS "DIRECT. BAC<232> 


If the source (.BAS) file is to be saved also, type 
the command: 


REPLACE dev:DIRECT({ account) 


NOTE: Do 


avu aise 


ranlana 
repsaacc 
. 


ot 
distribution medium 


as 


DIRECT subsequently executes properly. 
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Setting Terminal Speeds 


PROBLEM: 


The START.CTL file does not set terminal speeds correctly. 


SOLUTION: 

Multiple forces to KB%: should not be attempted by START.CTL or 
CRASH.CTL. All KB@: forces do not take effect until the END 
statement in the START.CTL or the CRASH.CTL file has been reached. 


To overcome this problem, any .CTL file should LOGIN and FORCE to 
a keyboard other than KB%:, except for the following statement: 


FORCE KB%:RUN SERRCPY 


which should come directly before the END statement. See the 
following example. 


MOUNT DB1l:SYSLIB NS: aden 
MOUNT DB2:SYSLIB ——— Teen PON COMMNRS 
LOGINS ——-—————: + ——- +. -- ENABLE LOGINS 


LOGIN KB1: [1,2] LOGIN ON NON~ZERO KEYBOARD 
FORCE KBl: RUN STTYSET GET TTYSET 

FORCE KB1l: VI¢5B ———— INCREASE SPEED OF FORCED KB: 
FORCE KB1:KB2: 


FORCE KB1: LA3¢S 
eee SET ALL OTHER KEYBOARDS 


FORCE KB1:EXIT 


FORCE KB1: RUN SQUEMAN > 
FORCE KB1:\DE ————— 


LOGIN KB1: [1,2] 
FORCE KB1: RUNSSPOOL START SPOOLER(S) 
FORCE KB1:@ 


SOFTWARE PRODUCT VERSION 
INIT 
SUBPROGRAM OR ADDITIONAL INFORMATION SEQUENCE PAGE 
START. CTL 4.16.1 
=n See 


START QUE MANAGER 
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Setting Terminal Speeds 


FORCE KB: RUN SERRCPY ~ TAKES EFFECT AFTER INIT EXITS 
SEND XXXXXXXXXXXXXXX AND "...ON AIR" IS PRINTED 
END 


SOFTWARE PRODUCT VERSION 
RSTS/E Utilities VG6A-G2 
COMPONENT VERSION 
SEQUENCE PAGE 
4.16.1 | 2 OF 2 


INIT 
SUBPROGRAM OR ADDITIONAL INFORMATION 


START.CTL 
REPLACEMENT ARTICLE 
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SOFTWARE DISPATCH — 


Hanging S$INIT (11-E4394) 


SUGGESTIONS : 


1. SINIT can hang if S$QUEMAN and/or $SPOOL do not start correctly. 
Include a BYEF in the START.CTL after the start-up commands to QUEMAN 


and SPOOL to alleviate any problem. 


2. Start-up time may be reduced significantly by running $TTYSET 
from one terminal to set the characteristics for all others, 
rather than using a CCL command of SET on individual keyboards, 
necessitating a separate LOGIN and RUN. 


3. If a trailing blank is omitted in a command string such as 
FORCE KB3:, INIT may err; however, if instead the user specifies 
explicitly FORCE KB3:%, the start-up procedure is more failsafe. 


SOFTWARE PRODUCT 
RSTS/E UTILITIES 
COMPONENT 
INIT 


VERSION 
v5C, V6A 
VERSION 


N/A 


SEQUENCE 
4.16.2 


ORIGINAL DATE 
September 1975 


SUBPROGRAM OR ADDITIONAL INFORMATION PAGE 


i SE y 


REPLACEMENT ARTICLE 
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RSTS/E Software Dispatch, July 1976 


RUN BURST NOT RESET IN LOGIN 


If a user logs in, runs $PRIOR to change the run burst and then logs 
in to another account, the run burst is not reset to the default 
value of 6. 


The following patch corrects the problem. 


1. 


2a. 


Log into the system under the account [1,2], the 
system library account. 


Mount the system library source medium on a free unit 
and bring the drive to a READY state. 


Copy of DEC-ORSLA-C-HA disk (RK) 
DEC=-11-ORSCA-D-UA3 Large Programs DECtape 
DEC~-11-ORSLA-D-MA7 magtape (7-track) 
DEC-11-ORSLA-D-MA9 magtape (9-track) 


(RK distribution only). 


Mount the copy of the System library using the UTILTY 
program and label SYSLIB. 


Bring the LOGIN source program into memory with the 
command: 


OLD xx:LOGIN.BAS xx=DTn for DECtape 
=MTin for magtape, and 
=DKn for disk cartridge 


READY 


RSTS/E UTILITIES VO6A-02 
LOGIN 


Seq 4.20.1* 
1 of 2 


19% 


19} 


Type the following lines: 


15010 J%=8% 
J%=16% IF (A% AND -256%)=256% 


I$=SYS(CHR$( 6%) +CHR$(-13%)4+CHR$(-1%) + 


CHR$(-1%)+CHR$(-2%) + 

CHR$(-1%)4+CHR$( 6%) + 

CHR$(-14%)4CHR$( JE)) 
RETURN 


Recompile onto the system library with the command: 


COMPILE SY0O:LOGIN 


If the source (.BAS) file is to be saved also, 
command: 


REPLACE dev:LOGIN (account) 


RAM. 


NOTE: Do not replace LOGIN.BAS on the 
distribution medium. 


LOGIN subsequently operates properly. 


RSTS/E UTILITIES VO6A-02 
LOGIN 


type the 


original 


Seq 4.20.1* 
2 of 2 
July 1976 


SOFTWARE DISPATCH pik 


July 1973 


Copying .BAC Files to DECtape 


PROBLEM: 


Copying .BAC files to DECtape and back to disk again can make them 
nonrunnable. 


EXPLANATION: 


Disk file blocks contain 512 bytes, DECtape blocks only 51%. For 
this reason, it is necessary to transfer BAC files as COntiguous 
files with the "CO" switches in PIP. This causes all bytes to be 
transferred as is to as many blocks as necessary. 


"/CO" will fill out the last block (usually an extra one) with NULLs 
(binary @ byte). For this reason, it is necessary to copy back from 
DECtape to disk with the "/CO:T" which truncates the last block by 
deleting the excess NULL fill. 
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SOFTWARE DISPATCH — 


October 1973 


Copying a File into the Same Account with the Same Name 


PROBLEM: 


ing PLP, copying. a file: ants 


fe 
will cause the deletion of the file. 


SOLUTION: 


PIP, when transferring files, opens the output file first, then opens 
the input file. If not using the PIP update switch (/UP), PIP's 

OPEN "FILNAM.EXT" FOR OUTPUT causes the deletion of any existing 

file by that name and the re-creation of that file with an initial 
length of zero blocks. 
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RSTS/E Software Dispatch 
January 1976 


Miscellaneous Problems 


PROBLEM: 


Through SPRs and internal usage, the following 
problems in the Extended PIP program have been brought 
to our attention: 


1. Though PIP can not handle wildcard accounts (or 
UICs, using the /DUS switch) on disks, it does not 
issue an error message when a user attempts a PPH 
wildcard operation; 


2. The progran issues a misleading error message when 
a command of the form 


x<wildcard file>=<non-file-structured device> 


is entered, where <wildcard file> may be any 
wildcard file specification (e.g., "TEST", where 
the lack of a period indicates that the output 
extension is to be taken from the input file 
specification), and <non-file-structured device> 
is just that (e.g., KB:, PR:, etc.); 

3. It is possible to create an output magtape file 
full of garbage records which fills the magtape 
when using the /FORHMAT:V switch from a file that 
contains only one record; 


4. The /DI and /DI:S commands report a clustersize of 
zero for disk files with clustersize of 256. 


SOFTWARE PRODUCT VERSION 
RSTS/E UTILITIES VO6A-02 
COMPONENT VERSION 
PIP VO6A~17 
SUBPROGRAM OR ADDITIONAL INFORMATION SEQUENCE PAGE 
4.25.3*| 1 OF 4 
NEW REPLACEMENT ARTICLE 
[| 


ORIGINAL DATE 
January 1976 
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RSTS/E Software Dispatch 
January 1976 


Miscellaneous Problems page 2 of 4 


>. When a CCL command of the forin 
PIP afilename 
is executed, the program often generates a 
UNIBUS TIMEOUT FATAL TRAP 
error when attempting to return to command iode. 


(All operations are successfully performed before 
the error is generated.) 


SOLUTION: 


The problems are all fixed by the following 
modifications. 


PREREQUISITES: 
RSTS/E VJsA-U2, and the large PIP program, PIPEXT 
YuuANel7. 

PROCEDURE : 


1. Log into the system under the account (1,2), the 
system library account. 


2. fount the system library source medium on a free 
unit and bring the drive to a READY state. 


Copy of DEC-11-ORSLA-C-HA disk (RK) 
DVEC-11-ORSCA-D-UAS Large Programs DECtape 
DEC*#11-ORSLA-“D-MA7 maztape (7-track) 
DEC*#11-ORSLA-D-MAY Inagtape (3-track) 


2A. (RK distribution only) 


Hlount the copy of the System library using the 
UTILITY program and label SYSLI6é. 


RSTS/E Software Dispatch 
January 1976 


Miscellaneous Problems page 3 of 4 


3. S8ring the PIPEXT source program into memory with 
the command: 
OLD XX:PIPEXT XX=DTn for DECtape 
=\4Tn for magtape, and 
=DKn for disk cartridge. 
READY 
Type the following lines: 
LItt! PIP VERSION bA ED[T 18 11/03/75 
4015 GOTO 4200 IF (Y74(00%) AND 13)=1% AND 
(SWAPS (CVT$%(MID(T$,29%,2%))) AND 768%)<>0% 
! JF A 'x' IN PROJ OR PROG FOR A DISK, ERROR. 
4200 ES=CHR$(13%)+CHR$(10%)+"PPN WILDCARDS ARE ILLEGAL - "+ 
FNU$(IS,°1%) 
E%=-32126, 
GOTO 4340 
1! SET UP THE ERROR MESSAGE FOR JLLEGAL PPN FOR DISK. 
4440 Egs-31014% 
ES=CHR$(13%)+CHRS(1lUy) + 
"QUTPUT FILE NAME NOT ABSOLUTE - "+ 
FNU$(0U$,71%) 
RETURN 
! JF OUT=(DT, MT, OR DSK) AND INP<>(DT, MT, OR DSK) AND 
! INPUT(FILE, EXT, PROJ, OR PROG)=WILD, THEN ERROR. 
b302 IF 253 AND 48% THEN 


T2$="VOV0"+CVT$$ (NUMS$ (13 %4B3%),71%) IF [542325 
: TF B1lg-024<T14-125+B3, THEN 
IF 02%=0% THEN ob10 
ELSE I2z=22%-I33 
FIELD #3%,02% AS 02$,B815-02% AS O28 
LSET O2$=STRINGS(LEN(02$),94%) : 018,02$="" 
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RSTS/E Software Dispatch 
January 1976 


Miscellaneous Problems page 4 of 4 


vv10 


8070 


10065 


E$="RECORD TOO LONG FOR OUTPUT RECORD" 
RESUME 1310 
T1IS=T1$+FNPO$(13%,DATE$(L3(175)+ 
SWAPS(L4(18%5)))) IF L% AND 32; 


TIS=I1$+FNPU$(5%,CVT$$ (NUM$(L3(27%) + 
SWAPZ(L3(28%) AND 1%)),-14)) IF L% AND b4% 


CLOSE 1% 


! EXPLICITLY CLOSE OUT THE COMMAND FILE BEFORE OPENING 
! ANOTHER ONE. 


Recompile the program onto the system library with the 
command: 


COMPILE SYQ:PIP 


Name the program with a privileged protection with the 
command: 


NAME "PIP.BAC" AS "PIP.BAC<K232> 


If the source (.BAS) file is to be saved also, type 
the command: 


NOTE: 


REPLACE dev:PIP(account) 


Do not replace PIP.BAS on the orlginal 


distribution medium. 


PIP subsequently executes properly. 


SOFTWARE DISPATCH psts/E 


FAILURE TO INITIALIZE QUEUE.SYS FILE - QUEMAN 


PROBLEM: 

The BASIC-PLUS system program prints the following messages when 
attempting to initialize the QUEUE.SYS file on a disk with a pack 
cluster size greater than 4. 

SUBSCRIPT OUT OF RANGE AT LINE 17650 
STOP AT LINE 20999 
SOLUTION: 


The patch below fixes the problem. 


PREREQUISITES: 


The system must have the large programs in the system library. 


PROCEDURE: 


1. Log into the system under account [1,2], the system library 
account. 


2. Mount one of the following system library source media on a 
free unit. 


Copy of DEC-11-ORSLA-C-HA disk (RK) 
DEC-11-ORSCA-D-UA3 Large Programs DECtape 
DEC~11-ORSLA-D-MA7 magtape (7-track) 
DEC-11-ORSLA-D-MA9 magtape (9-track) 
Make the unit ready. 
2A. (RK distribution only) 


Mount the copy of the system library disk using the UTILTY 
program and the label SYSLIB. 


SOFTWARE PRODUCT VERSION 
RSTS/E UTILITIES V06A-02 
COMPONENT VERSION 
QUEMAN N/A 
“4aga] 1 
4.29.1 


OF 
NEW REPLACEMENT ARTICLE ORIGINAL DATE 


1 2 
L_] 


203 


SOFTWARE DISPATCH ie 


3. Bring the QUEMAN source program into memory with the command: 


OLD xx:QUEMAN where: xx = DTn for DECtape, 
MTn for magtape, 
READY DKn for disk cartridge 


4. Type the following lines: 


1!!!! QUEMAN VERSION 6A EDIT 8 §6/23/75 
1p OPEN "KB:" AS FILE 1% 
: JP$=SYS(CHR$ (6%) +CHR$ (9%) +CHR$ (BZ) ) 
: PRINT "QUEMAN VAP6A-B8 - ‘+ 
MID(JB$,3%, INSTR(3%,UB$, CHRS$(B%))-2%) 
: JZZASCII(CJB$)/2% 
: JAS=CVTS$$ ("P"+NUM$ (U3) ,2%) 
: JP$=RIGHT(JB$,LEN(JA$)-12) 


17658 OPEN "QUEUE.SYS$" FOR INPUT AS FILE 2% 


: CHANGE SYS(CHR$(6%)+CHR$(-8%)+CHR$(2%)) TO MZ 
: C%¥=M%(13%)+1% : Z21%3M3(7%)+SWAPZ (MZ (8%) ) 


: FS=(Z1%/C%) *C% 
: IF F%<>Z1% THEN 

FS2FS+C% WHILE F2<Z1% 
PUT #2%,RECORD F% 
GOTO 17659 
17651 F%=F%-9% 
21028 DEF FNRS(I%) : 1%=1%-Z8%(0%,1%)-1% 


: IF 1%>F% THEN FZ=F%+C% WHILE 1%>F% 
: Z2$(FZ)="" : 283(B%,8%)=Z82(B%,0%) 


Recompile the program onto the system library with the command: 
COMPILE SY0:QUEMAN 
If the source (.BAS) form of QUEMAN is to be saved also, type: 


REPLACE dev:QUEMAN [account] 
NOTE: do not replace QUEMAN.BAS on the original distribution medium. 


SOFTWARE PRODUCT VERSION 
RSTS/E UTILITIES VO6A-02 
COMPONENT VERSION 
QUEMAN N/A 
SUBPROGRAM OR ADDITIONAL INFORMATION SEQUENCE 
OF 


4.29.1] 2 2 
NEW REPLACEMENT ARTICLE ORIGINAL DATE 


feed 


PAGE 
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RSTS/E Software Dispatch 
June 1976 


QUEUING FROM MAGTAPE 


PROBLEM: After queuing files on Magtape to a line printer, the tape drive 
occasionally winds up assigned to QUEMAN. 


PREREQUISITES: VOQ6A-02 of QUEMAN. 
DISPOSITION: The following patch corrects the problem. 
1. Log into the system under the account[1,2], the system library account. 


2. Mount the system library source medium on a free unit and bring the drive 
to a READY state. 


Copy of DEC-11-ORSLA~C-HA disk (RK) 
DEC~11-ORSCA-D-UA3 Large Programs DECtape 
DEC-11-ORSLA-D-MA7 magtape (7-track) 
DEC-11-ORSLA-D-MA9 magtape (9-track) 


2A. (RK distribution only.) 


Mount the copy of the System library using the UTILTY program and label 
SYSLIB. 


3. Bring the QUEMAN source program into memory with the command: 


OLD xx:QUEMAN xx=DTn for DECtape 
=MIn for magtape, and 
=DKn for disk cartridge 


Ready 
Type the following lines: 


IF 0%(23%,5%)>0%(23%,7%) THEN GOSUB 5700 : JS(J%,0%)=CHRS (2%) 

: S0O3=0%3 : GOTO 5440 

: IF IT'S EOJ BUILD AN ENDJOB. 

IF SO% AND 24576%3 THEN M3(1%)=6% : M&(2%)=11% : CHANGE M% TO MS 
MS=SYS (MS) : M%(2%)=63% 

: DEASSIGN AN ASSIGNABLE DEVICE. 


Recompile the program onto the system library with the cammand: 


COMPILE SY0:QUEMAN 


RSTS/E UTILITIES VO6A-02 Seq 4.29.2* 
QUEMAN l of 2 


RSTS/E Software Dispatch 
June 1976 


QUEUING FROM MAGTAPE 


If the source (QUEMAN.BAS) is to be saved also, type: 


REPLACE dev:QUEMAN account 


NOTE: Do not replace QUEMAN.BAS on the original distribution medium. 


RSTS/E UTILITIES V06A-02 
QUEMAN 


Seq 4,29,2* 
2 of 2 


20% 


RSTS/E Software Dispatch 
May 1976 


UNDERLINING TEXT WITH RUNOFF 


PROBLEM: Under certain circumstances, RUNOFF incorrectly 
underlines text strings which have been centered. 


DISPOSITION: The following patch corrects the problem. 


lit!!! | RUNOFF VERSION 6A EDIT 12 04-MAR-76 

10 PRINT "RUNOFF V06A-12" 

5310 GOSUB 22000 \ L$="" \ 
N9S=N9%+W9% IF Z9% OR INSTR(C9%,I$,"+") OR INSTR(C98,I$,"-") \ 
GOSUB 20000 \ L$=CVTS$$(FNO$(I$,0%) ,128%) \ 
I%=(N9%-LEN(LS$))/2% \ L$=SPACE$(I%)+L$ \ 
GOTO 5210 UNLESS Ds (08) 


RSTS/E UTILITIES V06A-02 Seq 4.35.1* 
RUNOFF 1 of 1 
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RSTS/E Software Dispatch 
May 1976 


PROBLEMS WITH RUNOFF 


PROBLEM: The RUNOFF program has problems concerning enable/disable 
flags command, underlining and footnotes, and commands following a 
-PAGE command. 


DISPOSITION: The following patch corrects the problem. 
PROCEDURE: ‘Type the following lines: 


1!!!! RUNOFF VERSION 6A EDIT 12 04-MAR-76 

10 PRINT "RUNOFF V06A-12" 

5110 GOSUB 22000 \ 

N9%=1% IF Z29%\ IF N98<1% GOTO 8920 ELSE 
GOSUB 23000 IF LO&%<03\ 
IF LO&$<N9%+2% GOTO 6810 ELSE 
PRINT #F2% FOR I%=1% TO N9% \ LO$=LO%-N9% \ GOTO 1000 

5310 GOSUB 22000 \ LS=""\ 

NOS=N9%+W9% IF 29% OR INSTR(C9%,I$,"+") OR INSTR(C9$,IS,"-")\ 
GOSUB 20000 \ LS=CVTSS$ (FNOS (I8,0%) ,128%)\ 

I%= (N9%-LEN(L$))/2% \ LS=SPACES (I%)+L$ \ 

GOTO 5210 UNLESS D3 (08%) 

5710 IF 29% GOTO 8920 ELSE IF F1%=3% GOTO 8940 ELSE 
N%=N9%*S9% \ GOSUB 23000 IF LO3K€=N%\ LO%=L03-N3 \ 
U1%=U9% UNLESS V9% \ V9%=V934N% \ X3=03\ 

OPEN F8S AS FILE 3%, MODE 23% 

5720 GOSUB 20000\ IF ASCII(IS$)<>F%(2%) THEN 
PRINT #3%, IS \ X%=X%+1%\ GOTO 5720 IF X%<¢=N%+603 \ 
PRINT 'Page'ABS(P9%)", Missing Footnote Terminator (!)" 

6310 GOTO 8920 IF FNC9$\ 

FOR X%=B% TO E%\ 
F9% (X$)=F%3(X%) IF F%(X%) \ P$(X%)=08\ 
NEXT X% \ GOTO 5680 
7110 GOSUB 22000\ 
N9%=1% IF 29%\ 
GOSUB 23000 IF LO$<03%\ 
IF LO&<(N9%+2%) *S9% GOTO 6810 


RSTS/E UTILITIES V06A-02 Seq 4.35.2* 
RUNOFF lof 1 
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RSTS/E Software Dispatch 
June 1976 


QUEMAN FAILS TO RESPOND TO SHUTUP'S SECOND QUEMAN MESSAGE 


PROBLEM: SHUTUP will not operate properly if QUEMAN fails to re- 
spond to SHUTUP's second QUEMAN message. 


DISPOSITION: The following patch will correct the problem. 
PREREQUISITE: The VO6A-02 version of SHUTUP.SPL. 


1. Log into the system under the account [1,2], the system library 
account. 


2. Mount the system library source medium on a free unit and bring 
the drive to a READY state. 


Copy of DEC-11-ORSLA-C-HA disk (RK) 
DEC-11-ORSCA-D-UA3 Large Programs DECtape 
DEC-11-ORSLA-D-MA7 magtape (7-track) 
DEC-11-ORSLA-D-MA9 magtape (9-track) 


2A, (RK distribution only) 


Mount the copy of the System library using the UTILITY program 
and label SYSLIB. 


3. Bring the SHUTUP source program into memory with the command: 


OLD xx:SHUTUP.SPL xx=DTn for DECtave 
=MTn for magtape, and 
=DKn for disk cartridge 


Type the following lines: 


biedd SAUTUP  VERSTON 6 ELIT 2 SO-MAR 76 

BHOO ON ERROR GOTO 8440 $ Z%e-1% $ M#=SYSCZO8) 
! INIT SEND COUNTER: PUT YOURSELF INTO RECEIVE TABLES. 

8616 ON ERROR GOTO 8450 3} M#2SYSCZIGECHRSCLZECHRSCLS%)) $f Mae 
"SECOND QUEMAN MESSAGE SENT" 3° FRINT M& 
! SEND THE SE QUEMAN MESSAGE « 


RSTS/E Utilities Seq 4.36.1 
SHUTUP 1 of 2 


209 


RSTS/E Software Dispatch 
June 1976 


QUEMAN FAILS TO RESPOND TO SHUTUP's SECOND QUEMAN MESSAGE 


Recompile onto the system library with the command: 


COMPILE SY0:SHUTUP 


If the source (.SPL) file is to be saved also, tyvoe the command: 
REPLACE dev:SHUTUP (account) 
NOTE: Do not replace SHUTUP.SPL on the original distribution medium. 


SHUTUP subsequently operates pronverly. 


Seq 4.36.1 


RSTS/E Utilities 
2 of 2 


SHUTUP 


zl0 
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RSTS/E Software Dispatch 
January 1976 


User Account Protection 


PROBLEM: 

SYSTAT does not protect against writing across account 
dy non-privileged users. The program also allows 
non-privileged users to use the /SLin switch, causing 
SYSTAT to DETACH. 

SOLUTION: 


The following modifications correct these problems. 


PREREQUISITES : 


None. 


PROCEDURE: 


1. Log into the system under the account (1,2), the 
system library account. 


2. Mount the system library source medium on ai free 
unit and bring the drive to a READY state. 


Copy of DEC-11-ORSLA-C-HA disk (RK) 
DEC-11-ORSCA-D-UA3 Large Programs DECtape 
DEC=11-ORSLA-D-MA7 magtape (7-track) 
DEC-11-URSLA*D-MAY magtape (J-track) 


SOFTWARE PRODUCT VERSION 
RSTS/E UTILITIES VO6A~-02 


COMPONENT VERSION 
SYSTAT VO6A-04 
SUBPROGRAM OR ADDITIONAL INFORMATION SEQUENCE PAGE 
4.39.1% 1 OF 3 
NEW REPLACEMENT ARTICLE ORIGINAL DATE 
[x ] [] January 1976 


RSTS/E Software Dispatch 
January 1976 


User 


Account Protection page 2 of 3 


2A. 


se 
350 


luve 


lvv3 


(RK distribution only) 


Mount the copy of the System library using the 
UTILITY program and label sYsLiB. 


Bring the sYSTAT source program into memory with 
the command: 


ULD XX:SYSTAT XX=UTn for DECtape 
=MTn for magtape, and 
=DKn for disk cartridge. 


READY 


Type the following lines: 


! SYSTAT VERSION bA EDIT 4 10/15/75 
AS=PEEK(PEEK(320,,) +2U5) 
: TF (AS AND -2504)<>250, THEN 
PRINT "CAN'T DETACH - FATAL" 
: slg, 
: GOTO 1200 
! DON'T LET HIM DETACH UNLESS HE'S PRIV'D. 
Aj=PEEK(PEEK(52U05) +205) 
2 IF (ig (54) OR MGCO5))<>05 THEN 
IF AZ<> (M3055) #SWAP 5 CNG C05) )) AND 
(A; AND -2505)<> 250% THEN 
PRINT “ILLEGAL OUTPUT - FATAL" 
: GOTV 1200 
1 CHECK TO PREVENT NON-PRIV'D USERS FROM WRITING 
! 


TO A FUREIGN ACCOUNT. 
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RSTS/E Software Dispatch 
January 1976 


User Account Protection page 3 of 3 


Recompile the program onto the system library with the 
command: 


COMPILE SYU:SYSTAT 


Nane SYSTAT with the privileged protection with the 
command: 


WAME "SYSTAT. BAC" AS "SYSTAT.BAC<K232>" 


if the source (.BAS) file is to be saved also, type 
the command: 


REPLACE dev:SYSTAT(Caccount) 


NOTE? Do not replace SYSTAT.BAS on the orlsinal 
distribution medium. 


SYSTAT subsequently executes properly. 


RSTS/E Software Dispatch 
April 1976 


TTYSET Handling of a VTSOH 


PROBLEM: 


Direct cursor address mode on a VT50OH fails in the X direction 
over X position 64. 


DISPOSITION: 


Run $TTYSET to SET LC OUTPUT. 


SOFTWARE PRODUCT 
RSTS/E UTILITIES 


COMPONENT 
TTYSET 


VERSION 
VOGA-01 
VERSION 


SEQUENCE PAGE 
4.42.1 7 OF EZ 


SUBPROGRAM OR ADDITIONAL INFORMATION 


ORIGINAL DATE 
April 1976 


PLACEMENT ARTICLE 
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May 1976 


INCORRECT ORDER NUMBER FOR A DISK CARTRIDGE (GC) 


PROBLEM: An incorrect order number for a disk cartridge is given 


on page 4-55 of the RSTS/E System Generation Manual Update No.1 (DEC- 
11-ORGNA-A-DN1). 


DISPOSITION: The order number for the RSTS/E FORTRAN IV VO1C disk 
cartridge is given incorrectly as DEC~1l1-LFRSA-A-HB. The correct 
order number is DEC-11-LRFSA-A-HB. A corrected page for the manual 


is provided. Remove page 4-55, 4-56 from the manual and replace it 
with the corrected version. 


RSTS/E SYSTEM DOCUMENTATION Seq 5.2.1 
RSTS/E SYSTEM GENERATION MANUAL DEC-11-ORGNA-A-DN1 1 of 3 
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Building System Library Files 


Disk Cartridge Procedures 


To prevent possible accidental destruction of 
the distribution cartridge, it is advisable to 
make a copy of the cartridge and use the copy 
to install the system. The stand-alone program 
ROLLIN, which is included in the RSTS/E system 
generation disk cartridges, and may have been 
included in the RSTS/E system, can be used to 
make a copy of the cartridge. Refer to Section 
2.3 for more information on copying disks. 


Mount the copy of the distribution cartridge 
(labelled RSTS/E FORTRAN IV VO01C, order number 
DEC-11-LRFSA-A-HB) on a free drive. 


Set the LOAD/RUN switch on the drive to its 
RUN position and ensure that the READY light 
comes on. 


Ensure that the WR PROT indicator is off (i.e., 
that the drive is write-enabled). 


While logged into the system under account [1,2], 
mount the disk cartridge by typing the following 
commands. 


RUN $UTILTY 
SYSTEM UTILITY PROGRAM ‘UTILTY V@6A-@5' 
2? MOUNT DK#:FORTRA 


? EXIT 
where DKO: may be replaced by DKn:, n specifying 
the unit on which the distribution cartridge is 
located. When the system responds with the READY 
message, run the BUILD program from the system 
disk as follows. 


RUN $BUILD 
The program prints the following two lines. 


SYSTEM BUILDER 
SYSTEM BUILD? NO 


Type NO in response to the SYSTEM BUILD question. 
BUILD continues with the following questions. 


AUXILIARY BUILD DEVICE? FORTRA 
CONTROL FILE IS? UTLLNG.CTL([128,128] 


Type FORTRA as the logical device name, then type 

UTLLNG.CTL[{128,128] to specify the correct control 
file. BUILD begins executing the commands in the 

file UTLLNG.CTL. Refer to Figure 4-1 for a sample 
printout of the procedure. 


Completion of the procedure is signalled by the 
BUILD COMPLETE message. Proceed to Section 4.7.1 
to continue with the FORTRAN installation. 


4-55 March 1976 
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Building System Library Files 


c. DECtape Procedures 


Mount the DECtape reels labelled RSTS/E FORTRAN 
Iv vOlC, order numbers DEC~11-LRFSA-A-UB1 and 
DEC-11-LRFSA-A-UB2, on DECtape units 0 and l. 
The -UBl1 reel should be mounted on unit 0, and 
the -UB2 reel on unit l. 


Set the WRITE ENABLE/WRITE LOCK switches on the 
drives to WRITE LOCK. 


Set the REMOTE/OFF/LOCAL switches on the drives 
to REMOTE. 


While logged into the system under account [1,2], 
run the BUILD program from the system disk as 


follows. 


peer Se 5 oe) 


RUN $BUILD 
The program prints the following two lines. 


SYSTEM BUILDER 
SYSTEM BUILD? NO 


Type NO in response to the SYSTEM BUILD question. 
BUILD continues with the following questions. 


AUXILIARY BUILD DEVICE? DTg 
CONTROL FILE IS? UTLENG.CTL 


Type DTO as the device and type UTLLNG.CTL to 
specify the correct control file. BUILD begins 
executing the commands in the file UTLLNG.CTL. 
Refer to Figure 4-1 for a sample of the console 
printout of the entire procedure. 


Completion of the procedure is signalled by the 


BUILD COMPLETE message. Proceed to Section 4.7.1 
to continue with the FORTRAN installation. 


4-56 March 1976 
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CONCISE COMMAND LANGUAGE (CCL) 


PROBLEM: 


The description of the CCL option in Section 2.7.24 of 
the RSTS/E System Generation Manual states that 
BASIC-PLUS immediate mode statements and commands can 
be superseded by defining CCL commands which override 
the command. Because of a change in the CCL parser 
(all spaces are no longer deleted) for VO6A-02, this 


feature is almost impossible to implement 
successfully. 
SOLUTION: 


The BASIC-¥PLUS syntax analyser removes all intervening 
spaces and tabs from a line input at the terminal. If 
a CCL command BYE were defined, it would override the 
BASIC-PLUS command BYE. If the user, however, types 
the BYE command with embedded spaces, the CCL command 
parser does not remove the embedded spaces but merely 
reduces spaces and tabs to one space. For example, a 
command B YE typed does not match the entry BYE in the 
CCL table and is passed to the BASIC-PLUS syntax 
analyser which recognizes it correctly. 


RSTS/E SYSTEM DOCUMENTATION VO6A-02 Seq 5.2.2 
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Liais ing LRATLIN 


PROBLEM: 


Section 3.3.2 concerning changing LOGIN contains a typographical 
error in line number 15010. 


SOLUTION: 


Change to an equal (=) character the last minus (-) character on 
the second physical line of statement 15010. The second line should 
read as follows: 


:J7% = 16% IF (A% AND -256%) = 256% 


The arrow indicates where the change should appear. Any users who 
have altered LOGIN using this statement should check the source 
file and recompile (with the correction) if the error exists. 


SOFTWARE PRODUCT . VERSION 
RSTS/E SYSTEM DOCUMENTATION VO6A-02 
COMPONENT ae 
RSTS/E SYSTEM MANAGER'S GUIDE 
DEC-11-ORSMD-A-D 
SUBPROGRAM OR ADDITIONAL INFORMATION SEQUENCE ip 
5.3.1 


NEW REPLACEMENT ARTICLE ORIGINAL DATE 
[x] [ March 1976 


RSTS/E Software Dispatch 
May 1976 


ERPOR IN SYSTEM USER'S GUIDE FOR RSTS/E (SPR 11D-1286 LS) 


PROBLEM: Page 4-103 of the RSTS-11 Svstem User's Guide states "The 
operator is told that the reel of tape to be physically mounted is 

MY TAPE. He then responds with the physical unit number on which the 
tape is mounted." This is incorrect. 


DISPOSITION: The second sentence of the above quote should be modi- 
fied to read "He then responds with the physical device name and unit 
number (e.a., MTZ:) on which the tape is mounted." This correction 
will appear in the next revision of the manual. 


RSTS/E SYSTEM DOCUMENTATION Seq 5.4.1 
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ERROR IN EXAMPLE PROGRAM DESCRIBING THE XLATE FUNCTION (SPR 11-6993 TT) 


The example program on page 12-24 (section 12.7 The XLATE FUNCTION) 
of the BASIC-PLUS Language Manual, contains an error. 


Line 110 in the program is: 
110 TS=CHRS (I1%)+TS$ FOR I%=@% TO 47% 
Replace this with: 


110 TS=CHRS ($%)+TS FOR I%=8% TO 47% 


RSTS/E DOCUMENTATION Seq 5.5.2 
BASIC-PLUS LANGUAGE MANUAL (DEC-11-ORBPB-A-D) lof 1 
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ANALOGOUS IF THEN STATEMENT CONTAINS A LOGIC ERROR (SPR 11-8102 JC) 


The BASIC-PLUS Language Manual, page 8-22, describes the UNTIL 
modifier by using an analogous IF THEN statement which contains 
a logic error. 


The condition in the UNTIL modifier is checked before the statement 
is executed. In the analogous IF construction, shown on page 8-22, 
the statement being conditionalized is executed regardless of the 
results of the following IF statement. The analogous IF construc- 
tion should be changed to read as follows: 


20 IF X=SQR(X'2) THEN 30 ELSE 40 


30 X=X+1 \GOTO 20 


40 PRINT X 
RSTS/E SYSTEM DOCUMENTATION Seq 5.5.3 
BASIC~PLUS LANGUAGE MANUAL DEC-11-ORBPB-A-D 1 of 1 
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Changing LOGIN 


PROBLEM: 

Section 8.3 concerning changing LOGIN contains a typographical 
error in line number 15010. 

SOLUTION: 

Change to an equal sign character the last minus (-) char- 


acter on the second physical line of statement 15010. The second 
line should read as follows: 


:J% = 16% IF (A% AND-256%) = 256% 


The arrow indicates where the change should appear. Any user who 
has altered LOGIN using this statement should check the source file 
and recompile (with the correction) if the error exists. 


SOFTWARE PRODUCT VERSION 
RSTS/E SYSTEM DOCUMENTATION VO6A-02 


COMPONENT VERSION 
RSTS/E PROGRAMMING MANUAL N/A 
DEC-11-ORPMA-A-D 
SUBPROGRAM OR ADDITIONAL INFORMATION SEQUENCE PAGE 
5.6.1 y OFy 


NEW REPLACEMENT ARTICLE ORIGINAL DATE 
[ March 1976 


RSTS/E Software Dispatch 
May 1976 


DATA RETURNED IN MONITOR TABLE PART II SYS CALL 


PROBLEM: The description of the Data Returned in bytes 15 and 16 
does not state what is actually passed back to the user. 


DISPOSITION: Replace the description on page 7-107 with the follow- 
ing: 


15-16 (RTSLNK) - the root link word in the linked list 
of Run Time System description blocks. The last 
entry in the list is denoted by zero. 


RSTS/E SYSTEM DOCUMENTATION, VO6A-02 Seq 5.6.3 
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DISABLE TERMINAL SYS CALL (FO=8) ON SYSTEM CONSOLE (KBO:) 


PROBLEM: 


The description of the Disable Terminal SYS Call to 
FIP (FO=8) erroneously states that error number 18 is 
generated if the keyboard number in the data passed is 
Q (that is, the system console keyboard). 


SOLUTION: 


Remove from the list of Possible Errors on page 7-52 
the error concerning KBO: (the system console). 


Add the following notes to the Discussion on page 
7-52: 


This call can disable the system console 
terminal (KBO:). Disabling KBO: is a 
dangerous operation because the SHUTUP 
system program runs only on that terminal. 


Any terminal disabled by this call remains 
disabled until the system is bootstrapped 
again. To disable a terminal (other than 
KBO: ) during multiple time sharing 
sessions, it is recommended that the SETKEY 
Option be executed as described in Section 
3.5 of the RSTS/E System Generation Manual. 


RSTS/E SYSTEM DOCUMENTATION VO6A-02 Seq 5.6.4 
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ERROR IN ACCOUNTING DUMP SYS CALL TO FIP 


PROBLEM: The description of the Data Passed incorrectly states that 
the project-programmer number is in bytes 3 and 4, 


DISPOSITION: Replace the current description of bytes 2 through 30 
on page 7-93 with the following description: 


2 CHRS (-15%), the accounting dump code. 
3-4 Not used. 
5-6 Project-programmer number of the account to which 


the system dumps the accumulated usage data. See 
Section 7.2.3 for a description of each byte. 


If both bytes are zero, the data is dumped to the 
current account. 


7-30 Not used. 
RSTS/E SYSTEM DOCUMENTATION V06A-02 Seq 5.6.5 
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INCORRECT DESCRIPTION OF LOGOUT SYS CALL 


PROBLEM: The description of the LOGOUT SYS call (F0=5) incorrectly 
states that the special flag JFHIBY must be set to execute this call. 


DISPOSITION: The use of the JFHIBY status bit was removed in V06A-02 
of RSTS/E. Remove all reference to JFHIBY flag from the description 
on page 7-74 of the RSTS/E Programming Manual (DEC~11~-ORPMA-A-D). 


RSTS/E SYSTEM DOCUMENTATION V06A-02 Seq 5.6.6 
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May 1976 


CONVERTING NUMERIC DATA 


PROBLEM: Users encounter difficulty when using Record I/O to read 
numeric data from a virtual array file. Data retrieved by the CVT 
function appear to have their bytes swapped. 


DISPOSITION: The CVT functions rearrange the ordering of bytes 
when converting data. The attached documentation is provided to 
clarify the operation of the CVT functions. Insert the pages in 
the RSTS/E Programming Manual following page 8-10. 


RSTS/E DOCUMENTATION Seq 5.6.7 
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8.5 CONVERTING NUMERIC DATA 


A BASIC-PLUS program stores numeric data in nemory in either 
floating point or 2-=byte integer format. When performing 
input and output of the numbers with Record I/0, a _ program 
manipulates the data in an intermediate I/O buffer. Because 
BASIC-PLUS addresses data in the buffer through character 
definitions, the program must convert numeric data to 
character format for transfer to the I/O buffer before the 
output operation. Likewise, numeric data input by the 
program for processing in memory must be converted to 
numeric format after extraction from the I/0 buffer. 


The CVT functions are provided to perform the required 
format conversions. These functions are implemented for 
speed rather than for logical ordering. They use stack 
operations to convert data and, hence, reverse the expected 
ordering of bytes. In converting 2-byte integer data, the 
reversal merely transposes the high and low bytes of the 
word. In converting floating point data, however, the high 
and low bytes of each word are transposed and the ordering 
of the words is exactly reversed. 


The reversal is usually not evident to the program. A 
program manipulating data with Record I/0 executes one 
function before loading the data into the I/O buffer and 
later executes a related function upon reading the data 
back. 


Figure 8.5-1 shows the conversion of 2-byte integer data by 
the CVT functions. 


Integer String 


CVT%$ 


Figure 8.5-1. CVT Conversion of 2-byte Integer Data 


The CVT2Z$() function reverses the byte order of the integer 
data word. The related function CVT$2() reverses the byte 
order of the character data, thus returning the integer to 
its correct byte order. 
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This reversal is evident, however, when a program uses 
Record I/0 to read data not written by Record I/0. Under 
such circumstances, the data read into the buffer is in 
correct byte order. The CVT$% function’ reverses the correct 
byte order of the data in the buffer. A program must 
execute the SWAP%() function to put the bytes in the proper 
order. For example, the system writes the standard PDP-11 
internal representation of the date as a 2-byte integer 
value on a DOS magtape label. A program, reading the label 
using non-file structured Record I/0, accesses the date in 
two bytes of a buffer addressed by D§$. The CVT$%() 
function, as shown below, converts the string D$ to the 
2=-byte integer format. 


10 DZ = SWAPZ(CVT$4(D$)) 
20 PRINT DATE$(D$) 


The CVT$%() function reverses the correct order of the 
bytes. The SWAP%() function swaps the high and low bytes to 
place them in proper order. The integer D% is afterwards 
used in the DATE$() function to produce the standard printed 
format for the date. 


Figure 8.5-2 shows the conversion of 2-word floating point 
data by the CVT functions. 


Floating Point (2-word) String 


Byte 0 


Byte 3 Byte 2 


Figure 8.5-2 CVT Conversion of 2-word Floating Point data 


When converting a 2-word floating point value to a 4A-byte 
character string, the CVTF$() function stacks the bytes in 
the reverse of their original order. The sign and exponent 
bits are not in the standard format. The same reversal 
occurs when the CVTF$() function converts a 4eword floating 
point value to an 8-byte character string. The results of 
the 4-word case are shown in Figure 8.5-+3. 
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Floating Point (4-word) String 
j Byte 0 Byte 1 Byte 0 


LOWEST-LO 


Byte 6 


LOWER-LO 


LOWER-HI LOWER-LO 


LOWEST-HI LOWEST-LO 


Byte 7 Byte 7 


Figure 8.5-+3. CVT Conversion of 4-word Floating Point Data 


Normally the conversion makes no difference because a 
program converts numeric data using one funetion and 
converts it back again using the related function. 


One occasion for confusion occurs, however, if a program 
reads floating point or 2-byte integer data from a virtual 
core array file using Record I/0 operations. Because the 
virtual array processor neither requires conversion of data 
nor itself converts data during input and output operations, 
the virtual array data read into an I/O buffer by Record I/0 
statements is in correct byte order. In usual Record I1/0 
operations, a program simply converts the character data in 
the buffer using the proper CVT function. But when a 
program performs this usual conversion on virtual array 
data, the CVT function reverses the correct byte order. and 
the resulting numeric data is bad. 


A solution to reading virtual array numeric data by Record 
I/O operations is to reverse the byte order of the data in 
the buffer before converting it. 


NOTE 


Reading a virtual array file using 
Record I/0 is not a recommended 
programming practice because the 
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usefulness of the automatic virtual 
array addressing mechanism is lost. 


The following sample program creates a virtual array file 
and reads back the numeric data, reverses the byte order of 
the data in the buffer, and generates the numeric 
representation using the CVT function. 


100 OPEN “VIRT.DAT” FOR OUTPUT AS FILE 1% 

120 DIM #1, A(O) \ A,A(O) = RND * 1000.0 

140 PRINT A \ CLOSE 1% 

200 OPEN “VIRT.DAT” FOR INPUT AS FILE 2% 

220 L% = LEN(CVTF$(1.0)) \ GET #2% 

240 B$ = °° \ FOR I% = L% = 1% TO 0% STEP -1% 
260 FIELD #2%, 1% AS B1$, 1% AS Bi$ 

230 B$ = B$ + BIS \ NEXT 1% 

300 PRINT CVT$F(B$); “SHOULD EQUAL’;A 


32767 CLOSE 1%,2% \ END 


Figure 8.5-4. Sample Conversion of Virtual Array Data 


The assignment statement at line 220 determines whether’ the 
2eword or 4-word floating point package is on the system. 
The length of the string returned is either four characters 
(2-word package) or eight characters (4-word package). The 
statements between lines 240 and 280 reverse the order of 
the eharacters returned in the buffer. The CVT$F() 
statement at line 300 converts the reversed string to the 
floating point format. (To handle 2-byte integer data read 
from a virtual array file, simply use the SWAP%@() function 
which reverses the byte order.) 


Further information on CVT funetions and storage format can 
be found in the BASIC-PLUS Language Manual under’ the 
following headings and sections: 


Integer constants and variables, 6.1 

Integer arithmetic, 6.2 

Mixed mode arithmetic, 6.7 

CVT conversion functions, 12.5 

RSTS floating point and integer formats, E.1 and E.2 
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USING ASCII I/O FOR SCRATCH DATA FILES (SPR 11-8422 JC) 


The manual suggests reusing scratch files rather than recreating 
them and increasing directory fragmentation. If the reused file 
is written with a lesser amount of data, the old data remains in 
the unused part of the file. This condition occurs because BASIC- 
PLUS null fills a partially unused block but retains old data in 
remaining unused blocks. It is impossible to shorten a file. 


When using ASCII I/O for scratch data files, it is best to specify 
OPEN FOR OUTPUT which deletes an existing file and creates a new 


version. 
RSTS/E SYSTEM DOCUMENTATION Seq 5.6.8 
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COBOL LINAGE Clause (SPR 11-5594) 


PROBLEM: 
LINAGE Clause does not work properly. 


Example: if LINAGE is set to 66, and 33 or more lines are 
printed, then top of page will not be performed 
correctly. 


DISPOSITION: 


This is systematic of a serious page format problem in the COBOL 
run time system. The LINAGE clause cannot reliably format a 
printed page. A fault in the COBOL I/O run time system has been 
identified. 


Until patch is published, do not use the LINAGE clause for page 
formatting but do it explicitly in the COBOL program using WRITE 
statements for top and bottom of page formatting. 


SOFTWARE PRODUCT VERSION . 
COBOL~11 V0O1.0A 
COMPONENT VERSION 
Notes/Programming Hints N/A 
SUBPROGRAM OR ADDITIONAL INFORMATION SEQUENCE PAGE 
6.2.1 


TOE v4. 
NEW REPLACEMENT ARTICLE ORIGINAL DATE 
[] January 1976 


RSTS/E Software Dispatch 
January 1976 


Page Formatting with Undesirable LINAGE (SPR 11-5863) 


PROBLEM: 


During OPEN processing for a file with LINAGE specified, an 
undesirable top-of-form is issued to the output file. 


The very first WRITE issued for a print file will shift the 
O/P line one space to the right. 
DISPOSITION: 


This is not patchable for V1.0A but will be fixed in the V2 
release in January 1976. 


SOFTWARE PRODUCT 
COBOL-11 
COMPONENT 

Notes/Programming Hints 


SUBPROGRAM OR ADDITIONAL INFORMATION 


VERSION 

V1.0A 

VERSION 

N/A 
SEQUENCE os 
6.2.2 


ORIGINAL DATE 
January 1976 


REPLACEMENT ARTICLE 
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Data Item Length Restriction (SPR 11-6068 RR) 


PROBLEM : 

COBOL-11 V1.0A restricts any data item to be less than 4096 
bytes (characters) long. This is an implementation restriction. 
SOLUTION : 

In the next release of COBOL-11 (February 1976, COBOL-11 V2) 


this restriction is appropriately diagnosed at compile time 
(Diag 460). 


SOFTWARE PRODUCT VERSION 
RSTS/E COBOL-11 V1.0A 
COMPONENT 
NOTES/PROGRAMMING HINTS 
SUBPROGRAM OR ADDITIONAL INFORMATION SEQUENCE PAGE 
6.2.3 


1 OF y 


NEW REPLACEMENT ARTICLE ORIGINAL DATE 
[x ] —_ February 1976 
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COBOL and Unlabeled Tapes on RSTS/E (SPR 11-5866 FI) 


PROBLEM: 


COBOL-11 cannot read and write magtape files that are not ANSI 
labeled tapes on RSTS/E systems. 


DISPOSITION: 


Processing of magtape files by COBOL is currently restricted to 
ANSI labeled tapes only. 


SOFTWARE PRODUCT VERSION 
RSTS/E COBOL-11 V1.0A 


COMPONENT VERSION 
N/A N/A 
SUBPROGRAM OR ADDITIONAL INFORMATION SEQUENCE PAGE 
ee, ie Oy 
NEW REPLACEMENT ARTICLE ORIGINAL DATE 


| | April 1976 
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OPEN STATEMFNT TO TERMINALS FAILS (SPR 11-8093) 
PROBLEM: On RSTS/E COBOL V2 an OPEN statement will fail if 
the output device is specified as KPnn:. 


DISPOSITION: The FCS emulator RTSLIP expects unit numbers 
to have octal values. In order to direct I-O0 to a keyboard, 


therefore, express the unit number as an octal number, e.g. 
SFLFCT TEST ASSIGN TO "KB11:". 
will direct RTSLIB to open KB9:. 


COPCL-11 V1.0A, V2 for RSTS/E VO6A-02 
COPOL-11 USFR'S MANUAL DEC-11-LCOBA-B-D 


Seq 7 
lofl 
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COBRG TOO BIG FOR STANDARD COBOL COMPILER (SPR 11-8452 BR) 


COBRG is too big for standard COBOL compiler. 


Build 28K COBOL compiler using LNGBLD. When asked ANY CHANGES?, 
answer YES and specify a new size of 28. 


COBOL-11 V2 for Seq 9 
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CROSS REFERENCE PROBLEM (SPR 11-8522 FI) 


Cross Reference listing option (/CREF) does not always work on RSTS/E. 


The problem is due to faulty assignment of logical units to CREF 

scratch files in the task build command file (CBRSTS.CMD) for COBOL 
on RSTS/E. The list of logical unit assignments should be as shown 
below. Modify CBRSTS.CMD and rebuild COBOL-11 and CREF should work. 


; 
sTHIS FILE TS THE COMMAND FILE FOR Tkp TO BUTLM THE COHGL|t1 OVERLAY STRUCTURE 
tFOR RSTS/E V,6 COROL, THE OVERLAY RESCRIRFTCR FILE IS CARSTS,OOL 


COBOL e+ COROLScaRSTS, DLs" 


TASK = 4,.CAL rTASk NAME 
STACK = 542 ¢THE DEFAULT 
UNITS = ja 


s 

STHE FOLLOSING THO COmManoS MEFINE ThE INTERNAL STORAGE USED BY THE 
PCOMPTLER (+FSLK) AND MuMeTIME SYSTEM (HPEND) FOR PROCESSING 

sTHE SOFTH AGE VIRTUAL FENORY wORKFILE, 

THE MINTS VALUES FOP THES AREAS ARE 

: SFBLKga¢e (QCTAL) 

; “PEND 3 3cdaa COCTAL) 

PTHE SET ERRFECT CF EXTP uD THE SIZE OF THESE AREAS IS TO SPEED UP THE 
sCOMPILER AND RUN TIME SYSTEM 

PIN ADDITION THE AREA #FEND May HAVE TO BE EXPANDED DEPENDING ON THE 
#STZE OF THRE COBOL PRAGRAM OP THE NUMBER OF SIMULTANEQUSLY OPEN 
tFILES IN THE RUNNIDG PROGREM, 

pekkike 

FEXTENSION OF THESE AREAS SaQuLD BE JN BLOCKS OF 238 (MCTAL) 
ptkkee 

' 

tIN GENERAL, AFEND May AE AS MUCH 

SAS Pevitw MORE THAN wFALK WITHOUT PENALIZING TOTAL “EMORY USED, 

AS THEY ARE TM DIFFERENT NvERLAYS CF VASTLY GOIFFERENT SIZE, 

tTHE MINTMUM VALUE WFR Xmaeva,wFENDS $3008 YIELOS A COBOL wHICH wILl 
PRUN CALRETT SLOWLY) IN fan OF USER MEMORY WITH ABOLIT 1 aK CHARS OF 
PRUN| TIME DATA AREA AND 4A FEW FILE SUFFERS, 

7THESE PARAMETERS ARE ALTESEN IN PSTS BY FALALA PROGRAM, 

? 
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EXTSCT wFAL KI S200" 
EXTSCT aFENOD RTL OMY 
EXTSCT ESFSR{ potas 
ASG f KSppe KBr 2eSVs seth sd Ker S5eSV toy SVs Te SV sae SVG svete SV El 
ASG = Sysi2eSyvysiss,Syri4 


ow 


5 
rCALL PARAMETERS FOLL MW 
GBLOEF = CATKSZ:u 


H 

GBLOEF & NExMAGEI euee MAG TAPE ENABLED 

GRLOEF = PREFIX s3244G6¢ PPULL/NULL 

GBLDEF s PNSFIxXyues215 sCR/LF 

GBLDEF = CRLVERS31%07 rA5CIT "eo" 

GHLDEF = CRLEDTs2eied sASCTIT "a " 

GBLUEF = RUFCNT3] 21 FOR SINGLE 2 FOR NOUALE RUFFERING 
GBLDEF = RSTSSWei giQheu FOR RSTS 


' 

tLOGICAL UNIT ASSIGNPENTS (AROVE) 
3302 wORKFILE 

$4 = ACCEPT NEVICE LUN 

95 = OLPLAY MEVICE LUN 

$6778 = CREF SCRATCH FILES 

$6 = SOURCE FILE INPUT AND FIRST USER FILE LUN 
$7 = LIBRARY FILE IN@UT 

78 = OBJECT PROGRAM FILE SUTPUT 
99 © INTERMEDIATE OBJECT FILE 

p12 = LISTING FILE OUTPUT 

pli © CREF Data FILE 

$12 © SECOND «ORK FILE 

$6 = {4 RUN|eTIME COBOL FILES 


! 
PTHE NEXT COMMAND IDENTIFIES THIS TaSk 45 a COMPILE aNd GO SYSTEM 
9TO THE RESIDENT COMPILER CODE 


: 

GBLOEF = TaSkS31 

GBLDEF = MSGLUNG2 

GBLDEF = wRkLUNS3 

GBLOEF = ACCLuNsa 

GBLDEF = DISLUNSS 

GBLDEF = xLuns?. 

GRLDEF = INLUNELG 

GBLDEF = OUTLUNGA SNOT USED BUT NEEDS TU REDEFINED 
GBLDEF = MULAUF si NOT USED BUT NEEDS TO BE PEFINED 
GBLDEF = SRCLUNS6 

GBLOEF = CPYLUNG7 

GBLDEF = OBJLUN3s14 

GBLDEF = INTLUNS 4] 

GBLOEF = LSTLUNIL2 

GBLOEF = CRFLUN3 13 

GRLDEF s MAPLUNS13 

GBLOEF = wFalLuNsya sSECOMD BORK FILE 

GBLDEF = FIRLUNt6 

GBLDEF = MAXFLS$16 

GBLDEF = TTOFV:01433 KA FOR BPSTS/E 

/ 

RSTS/E VOGA-02 Seq 10* 
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GO TO RESERVE WORD PROBLEM (SPR 11-8169 BR & RB) 


A GO TO statement whose destination is a reserved word causes 
compiler to loop. 


The problem will be corrected in module AGOP. This will be con- 
sidered for the next release of PDP-11 COBOL. 


COBOL-11 V2 for Seq 1l 
IAS Vl, V1.1, RSX-11D V6A, V6B(V06.01) 1 of 1 
and RSTS/E V06A-02 


RSTS/E Software Dispatch, July 1976 


UNSTRING VERB USING NONINTEGER DATA ITEMS (SPR 11-8169 BR & RB) 


An UNSTRING statement containing a noninteger numeric receiving 
field causes fatal error #222. No such diagnostic should be issued 
as this is a legitimate operand. 


The compiler module UNST will be corrected to permit a noninteger 


numeric receiving field in an UNSTRING statement. This will be 
considered for the next release of PDP~11 COBOL. 


COBOL-11 V2 for Seq 12 
IAS Vl, V1.1, RSTS/E VO6A-02, RSX-11D V6A, V6B(V06.01) lof 1 
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RECORD SIZE APPEARS AS FOUR ASCII BYTES (SPR 11-9106 BR) 


1. Record size appears as four ASCII bytes in magtape files. 


ANSI magtape conventions prescribe four ASCII bytes to define record 
size. See PDP-11 COBOL User's Guide Version 2, DEC-11-LCUGA-B-D, 
section 6.2.5. 


2. Magtape record blocking not expected if BLOCK CONTAINS 512 CHAR- 
ACTERS appears in COBOL program. 


Default magtape blocking uses a minimum physical block size of 

512 bytes. Each such block contains one or more complete (no record 
spanning) logical records. See PDP-11 COBOL User's Guide Version 2 
DEC-11-LCUGA~B-D, section 6.2.5. 


COBOL-11 V2 for IAS Vl, V1.1, RSTS/E VO6A-02, Seq 14 
RSX-11D V6A, V6B(V06.01) lof 1 
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2780 PACKAGE NOTE 


The RSTS/2780 package used for RSTS/E V0O5B-24 will not work with 
RSTS/E VO6A-02. A new release of the 2780 package is available 
from DIGITAL's Software Distribution Center. The 2780 package 

must be available on the same type distribution medium as the RSTS/E 
software. Identification numbers for the RSTS/2780 package which 
is compatible with RSTS/E VO6A-02 are listed below. 


DEC-11-ORCOA-C-UC (DECtape) 
DEC-11-ORCOA-C-MC9 (9—track magtape) 
DEC-11-ORCOA-C-MC7 (7-track magtape) 
DEC-11-ORCOA-C-HC (RK disk cartridge) 


SOFTWARE PRODUCT 


VERSION 
RSTS/E 2780 Emulator N/A 
COMPONENT VERSION 
2780 Notes N/A 
cen ag 
8.1.1 


qT Ory 


NEW REPLACEMENT ARTICLE ORIGINAL DATE 


RSTS/E Software Dispatch 
January 1976 


Excessive I/O Errors 


On one system configured for the RSTS/E 2780 package, 
a large number of records sent by the remote system 
were not recelved properly and NAKs were returned. 
The communication lines checked out clean and all 
PDP-11 hardware was functioning properly. 


In this case, the DP11 was located behind the system 
disk and DH11s on the PDP-11 Unibus. The position of 
a device on the Unlibus determines’ the relative 
priority for devices jumpered for the same hardware 
priority level. The device closest to the processor 

will have the highest effective priority. Hence, If a 
Synchronous Interface such as a ODP11l or ODU11l is 
located electrically behind DH1l1ls and the system 
disks, It will not be serviced until there are no bus 
requests pending from the DH1l1ls and = system disk. 
Heavy terminal and disk activity can lock out DP11 or 
DUI11 interrupts long enough to cause overruns. 
Overruns on transmit or recelve will cause the’ record 
to be NAKed. 


If excessive 2780 1/0 errors do occur, DEC Fleld 
Service should check the hardware configuration to 
determine the position of the DP11 or DU11 in relation 
to other priority 5 devices on the Unibus. Reposition 


the DP11 or DU11 to be electrically behind the system 
disk but in front of any DH1ls. 


SOFTWARE PRODUCT VERSION 
RSTS/E 2780 Emulator V0OG6A-02 
COMPONENT VERSION 
2780 Notes/Programing Hints N/A 
SUBPROGRAM OR ADDITIONAL INFORMATION SEQUENCE PAGE 
8.1.2 1OFy 
NEW REPLACEMENT ARTICLE ORIGINAL DATE 
[x] [| January 1976 


RSTS/E Software Dispatch 
February 1976 


Reporting Problems With 2780 


Before submitting an SPR on 2780, there are several pieces of infor- 
mation which should have been acquired. If these are included with 
the SPR, it saves time in recontacting the user and prevents going 
down some dead-end paths. 


i. What kind of 2780 (DOS, RSX-1IM, RSX-11D, RSTS/E)? 
2% What version of the package? 
3. Configuration of the PDP-11 
a. memory 
b. devices on system 
c. system load 
d. synchronous device (DU or DP) 
4. What kind of modem is on our side, on the other side? 
5 What speed? 
6. What system are you communicating with? If it is another PDP-11, 
answer the questions above. 
If it is another vendor, find out 
a. What operating system is being used and what communications 
software (i.e., OS/MVT HASP, OS VS2 HASP)? 
b. What interface is béing used (i.e., 2703, 370X, 
Memorex 1270) ? 


This information is necessary for correct diagnosis. For example, 
there is a problem with a DOS/2780 which occurs only on a system 
with a DU11, four-wire leased line going into a Memorex 1270 
front-end. The symptoms sound like bad phone lines or modem 
incompatibility and will be diagnosed as such unless we have 

all the information. 


SOFTWARE PRODUCT VERSION 
RSTS/E 2780 EMULATOR V5B and Later 


COMPONENT VERSION 
NOTES/PROGRAMMING HINTS 


SUBPROGRAM OR ADDITIONAL INFORMATION SEQUENCE PAGE 
OF 
8.1.3 1 1 


NEW REPLACEMENT ARTICLE ORIGINAL DATE 


[| February 1976 
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Installing and Troubleshooting 2780s 


Installing a communication package involves a minimum of two 
vendors and more likely three or four. The most time-consuming 
aspect of installation can be pinpointing the problem. When 
installing A to communicate with B, the problem may be in one 
of seven areas. 


A's software (either code or sysgen parameters) 
A's hardware 

A's modem 

phone line 

B's modem 

B's hardware 

B's software 


Sometimes a given symptom can have several possible causes. Then 
it is necessary to go through a step by step elimination procedure. 


Here are some ideas and suggestions for when difficulties arise in 
installation of 2780 packages. 


SOFTWARE PRODUCT VERSION 

RSTS/E 2780 EMULATOR V5B and Later 
COMPONENT VERSION 

NOTES/PROGRAMMING HINTS N/A 
SUBPROGRAM OR ADDITIONAL INFORMATION SEQUENCE PAGE 
8.1.4 | 19°F 9 
NEW REPLACEMENT ARTICLE ORIGINAL DATE 
[ x] Ea February 1976 
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Installing and Troubleshooting 2780s Page 2 of 9 


1. What is a 2780 and what is its protocol? 


For those who are unfamiliar with what a 2780 emulator is emulating, 
here is a short description of what it is and what its protocol 
is like. 


The 2780 was an unintelligent, hard-wired terminal which could 
communicate to an IBM host or to another 2780. It read cards 

and transmitted them over a synchronous link to another computer. 
It received data back and printed it. The model 2 2780 could also 
receive back data for a card punch. 


The 2780 would send 80 character card image records blocked into 
a maximum of a 400 character block. It did have the ability to 
drop trailing blanks in the record if told to do so by the 
presence of a special control character (the EM-end media option). 
For reception it would print or punch a file according to a per- 
ipheral selection code (basically an Escape 4 would send a file 
to the punch). It was able to accept horizontal tabs and would 
handle them according to the spacing of a special HT record which 
would be sent at the beginning of the file. The block size was 
again a maximum of 400 characters. 


A synchronous protocol is used to enable the data to be sent back 
and forth. The protocol determines who speaks, when, and whether 
or not the other end heard them correctly. When there is synchron- 
ous communication, the two modems sample the line at a preset speed 
(2000 times a second or 4800, etc.), and the data is sent in 

blocks with one character directly following another. Every 
message, therefore, whether a single control character or a 

400 character block, is preceded by four SYNC characters and 
followed by a PAD. The SYNC characters are used to allow the 
hardware to tell when valid data is coming (as opposed to noise 

on the line), and the PAD is used to make sure that the final 
significant character is fully received. Every data record sent has 
a CRC (circular redundancy check) computed on its characters, and 
following each IUS, ETB, and ETX is a two-character checksum which 
is used to make sure the data was received correctly. 


Installing and Troubleshooting 2780s 
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The major control characters used in the 2780 protocol are: 


ENQ (enquiry) : 


ACKG (acknowledge) : 


ACK1 (acknowledge) : 


NAK (negative acknowledge) : 


STX (start of text): 


ETB (end of block): 


ETX (end of text): 


IUS (intermediate record end): 


EOT (end of transmission) : 


(1) Used to request permission to 


send data (bid); 


(2) Used to request resending of 


a missed response. 


(1) Used to give permission to 
send data; 

(2) Used to accept every other 
data block. 


Used to accept every other 
data block. 


Used to reject a data block. 


Used to indicate the beginning 
of a data block. 


Used to indicate the end of a 
data block. 


Normally used to indicate the end 
of the final block of the job. 


Used to indicate the end of a record. 


Used to indicate completed trans- 
mission and give up control of 


line. 
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A sample job might be sent as follows: 


A B 
ENQ — ;request permission to send 
<= ACK¢Z ;permission given 
STX DATA] ETB —~* ;block of data 
<+- ACK1 ;acknowledge correct reception 
STX DATA2 ETB -~> ;another block 
< ACKG 


STX DATA3 ETB —>» 


—<— NAK ;rejection of data 

STX DATA3 ETB —> ;resending of data block 
<— ACK1 

STX DATA4 ETX —> 

ENQ —» 73 second silence request for response 
<«— ACK1 ;response shows did not see block, 


since an ACK® is the expected 
response for DATA4 


STX DATA4 ETX —~> ;block resent 
<— ACK® 
EOT —> ;transmission complete 
<= ENO sother side requests permission to 
send data 
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Incorrect Stack Management in Arithmetic Expressions 


eIDENT Lamay 


AVA SAY ePSECT &1lMata 
AABGAN “ORD Lodeted 
A001 eh ORD 12vvb~a 
AdBAL2 20ND a 

AAAALS eN0RD A, 

APA AZY ee ORD 414010 

AvBAPa eKORD a,a 

AVAAAA ePSECT SCODE1 
ABBuAA XE 

JvrAaae MUV @A4(R5),e(SP) 
AARWAS MUV a(25),=(§P) 
Avtyiu MOV 2(R5),"(SP) 
AAAALS MUV esIOAtTAs+i4,<(SP) 
ABBA JSR PC,Mka2s 
AQAAZG MUV $1 OaTas22,R1 
Addasey MUL 8S0,R1 
AAAYS4 MOV SL 0aTA4+92,R0 
AZAAED ASH Ra,Ri 

AAA A44 ADD SLOATAS{6,R 2 
AAAYHY MUYV Rie STEMPS 
ABAARA MOV Rit, sTEmese2 
AADABA SETU 

Adndbe Loo 2aCKA) FY 
AYAABG STN Fia,7(SP) 
ADAN7D Jor Ra,MLCCd 
DAAAIG e WORD 3 

AYVAATA MoV STEMPS42,R2 
AAALA? AOD $IDATAs16,R2 
AYALAGB SETD 

aaniia LOD 20( KA), FY 
AwAlia4 $1D Fiui,e(sP) 
ASALI6G Joe PC,SWP44> 
AYVALI2 Jor R4,SBCS> 
A4B126 MOV HTEMPDS, RY 


SOFTWARE PRODUCT VERSION 
FORTRAN IV-PLUS 
COMPONENT VERSION 


SUBPROGRAM OR ADDITIONAL INFORMATION SEQUENCE PAGE 
4 8 OF 9 
NEW REPLACEMENT ARTICLE ORIGINAL DATE 
August 1975 
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3. Initial attempt to run 


One of the more frustrating circumstances is to bring up the 
package, issue a transmit command, and have it do absolutely 
nothing--including not giving out an error message. Silence, 
however, can be just as significant as a message. 


This section will itemize the things that can go wrong in the 
sequence in which they would be encountered. It is specified 
when systems react in different ways. The systems involved are 
core/DOS, RSX-11D, RSX-11M, and RSTS/E. 


a. RUN the program for the first time and 
(1) the system crashes in RSTS/E, 
(2) there is an odd address trap abort in RSX-11D or RSX-11M, 
(3) there is an F370 message in DOS and 
(4) there is a halt in core. 


Probably the device address of the DU11 is incorrect. The DUII1 
is one of the floating device address devices. Check that the 
device was installed at the correct address (i.e., if the DU11 is 
the only floating device on the system, it will be at 760040) 

and also that the system was told the same address. RSTS/E and 
core/DOS calculate the address; RSX-11D and M have it specified 
during taskbuild. 


b. Run the program and get ready to make the connect. Dial 
the phone, receive the beep from the other end, and push 
(or pull) the data button and 
(1) the data light does not light or 
(2) the DSR indicator does not light. 


Usually a dial-out system will not give DSR (data set ready) until 
DTR (data terminal ready) has been presented by the hardware. 
(1) check that the light is not burned out. 
(2) check that it is on-line (all systems except RSTS/E). 
(3) check whether a valid but incorrect device address 
was specified (RSX-11D and M). 
(4) check that the hardware diagnostics were run, including 
the one using the modem cable. 
(5) check that the DTR bit is on in the status word. 


With a leased line, the modem often has DSR strapped on constantly. 
In that case, this type of error may not be discovered until later 
in the procedure (see c. and d.). There are some dial-out modems 
(i.e., some Milgo modems) which have DSR strapped on also. They 
allow a transmit command to be given without the connection 

having been made (see d.). 
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c. The program has been run and the connection established; 
a transmit transfer command is issued and a modem (or data 
set) not ready message is given. In all except RSTS/E, 
this indicates 
(L) The data set is not ready (i.e., DSR is not up) or 
(2) A valid, but incorrect, device address has been used. 


For RSTS/E it indicates that the 30 second timer (set when the 
PUTD command is issued to the driver) has expired. In RSTS/E 
while in the driver, you are considered to be in I/O, and the 30 
second timer is used to prevent hanging in I/O. The error message 
actually indicates several possibilities for RSTS/E. 


(1) the modem is not ready. 
(2) the interrupt vector for the DU11 or DP1l is incorrect. 
(3) bid is getting no response. 


For details on these see d. 


d. This is at the same stage as c. The first transmit command 
has been issued, but nothing happens. There are several 
causes, although they are not all applicable to every 
system. 


(1) Incorrect interrupt vector (RSX-11D and M) or interrupt 
vector out of range (core/DOS). Since in D and M the vector 
is specified at build time, check that it corresponds with the 
actual hardware vector. In core/DOS the DP is expected 
to be in the range of 300--376 and the DU in the range of 
300--476 (see Installation Notes pp. 3-2 and 3-3). 


(2) No response to the bid (core/DOS, RSX-11D and M). These sys- 
tems do an infinite retry on the bid if getting no response 
(except for RSTS/E which does a timeout). Unfor- 
tunately this cause is really a symptom with multiple 
causes of its own. A list of suggested possibilities 
are: 


(a) the remote end software is not up (especially with a 
leased line you cannot tell), or the connection was 
never made (a dial-out modem with DSR strapped on). 

(b) the modems have different speeds (i.e., 2000 baud 
talking to 2400, etc.). 

(c) the modem is not sending out the signal (this can 
usually be checked by finding out whether the other 
end has seen the bid). 
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(d) the other end is responding but the turn-around 
time is too fast (usually only true on a two-wire 
dial-out system where the other modem has not 
previously been used). 

(e) the other end is responding but the modem either 
does not see it (receive strength too low) or 
the modem does not pass it back (bad receive leads 
on the modem), or our hardware does not see it (bad 
receive chip or modem cable should be caught by 
diagnostics). 


Determine a correct response to the bid by whether or not 
the package has gone into transmit mode. In all packages 
except RSTS/E check transmit mode by doing a QUERY. In 
all the packages if something goes wrong when in transmit 
mode, the user will get an error message instead of just 
hanging silently (see e). 


e. When attempting to transmit, there are constant or 
extremely frequent transmit abort errors. Once 
again each system gives its own version of the error 
message, but they all indicate that either eight 
attempts to send a data block were NAKed, or eight 
ENQ requests for response were ignored. 


If the first block or first record are not accepted, 

the KGll may not be working right. If it is improperly 
seated, two zeros for the CRC characters will be gotten. 
The diagnostics should catch it quickly. 


If interfacing with DOS/POWER, the ENQ retry counts should 
be increased. 


If on a multi-user system, the package should not be on at 
a speed higher than that warranted. 


If on a multi-user system, the DP1l or DU11 should be the 
furthest forward hardware level 5 device on the bus (besides 
the system disk). If problems persist (especially in a RSTS/E 
system with a DH11), it should be raised to level ¢ and the 
interrupt vector codes changed from 240 to 300. The other 
reasons for this are, of course, either bad modem, incompat- 
ible modems, or bad phone lines. 
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Transmit works fine but files cannot be received. 


Since you are able to transmit, it means that the hard- 
ware actually receives correctly (you have to receive 
responses). Therefore, there is quite probably some- 
thing about the type of data received. If actually 

in receive mode, it indicates that the other side has 
sent a bid, and you have responded with an ACK%. Some 
of the possibilities are as follows: 


(1) the modem is turning around too fast, and the other 
end does not see the response (usually only ona 
two-wire line). 


(2) the other system is generated to think that you 
are something other than a 2780. This is quite 
common if the system is supporting 3780s and 
Workstations also. Surprisingly enough we will 
be able to transmit data files into the system 

_ since the 2780 protocol is a subset of the others. 
If the other system is genned for a 3780, the 
block will be 512 and we can only accept 400. 
Workstations do not use any IUSs, and we think the 
record is too long (most of our systems can only 
accept escape -characters and 132 data for a total 
of 134; they are being changed to accept the 
too long record and truncate it). One way to 
check this is to ask how the other end sysgen 
parameters are set up for id or remote number. 
Then check this against the Installation Notes 
chapter for the central sites operating system. 


(3) The other system is genned for a 2780 with a 
140 character printer. This gives the same 
trouble as 2. 


Installation is complete when you can bring in the 2780 program, 
transmit files, and receive back data. 
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Improper Handling of Received EOT 


PROBLEM: 


The 2780 Handler will not respond to a received EOT while it is 
transmitting. 


SOLUTION: 


After a block has been transmitted, the 2780 Handler should look 
for an EOT status being returned by the BISYNC protocol module. 
If such a status is found, the BASIC-PLUS program should be given 
an indication that the remote end has terminated the 
transmission. 


1. This patch should be installed on all V0O6A-02 systems which 
are configured with the 2780 Handler. 


é. Obtain a listing of the RSTS load map. This map was’ printed 
during System Generation if a line printer was available at 
that time. Otherwise, the map must be printed from the LICIL 
tape created at System Generation time (DECtape or magtape 
distribution) or from the System Generation DECpack (RK 


distribution). If obtaining the map from tape media, print 
the file RSTS.MAP from the LICIL tape using PIP under RSTS/E, 
the System Generation monitor, or any DOS monitor. If the 


media is DECpack, use PIP with the /DOS switch under RSTS/E 
to print the file RSTS.MAP from account [1,1] on the System 
Generation DECpack or bootstrap the System Generation 
DECpack, LOGIN under account [1,1], and use PIP under DOS to 
print the file. 


3. On the first or second page of the RSTS map under the heading 
"Program Section Allocation Synopsis" find the tag <Z.USER> 
and record the first number to the right of the section name 


SOFTWARE PRODUCT VERSION 
RSTS/E 2780 Emulator VO6A-02 
COMPONENT VERSION 
2780 Patches N/A 
SUBPROGRAM OR ADDITIONAL INFORMATION SEQUENCE 
8.2.1* 


NEW REPLACEMENT ARTICLE ORIGINAL DATE 


[x ] [ December 1975 


RSTS/E Software Dispatch 
December 1975 


Improper Handling of Received EOT 
(first column of numbers). 


[Z.USER] = 


4, Bootstrap the RSTS/E system disk normally to load 


initialization code into memory. Then use the patch option 


of the INIT code to install the patch as shown below. 


OPTION: PATCH 

MODULE NAME? RSTS 

BASE ADDRESS? [Z.USER] 
OFFSET ADDRESS? 1730 


MODULE BASE OFFSET OLD NEW? 

RSTS [Z.USER] 001730 000004 ?000006 

RSTS [Z.USER] 001732 XXXXXX ?TC CONTROL/C Exit 
OPTION: 


SOFTWARE PRODUCT VERSION 
RSTS/E 2780 Emulator VO6A-02 
COMPONENT VERSION 
2780 Patches 
SUBPROGRAM OR ADDITIONAL INFORMATION SEQUENCE PAGE 
8.2.1* 2 OF 2 
NEW REPLACEMENT ARTICLE ORIGINAL DATE 

[| December 1975 
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Lost and Duplicate Records 


PROBLEM: 


When receiving a retry block, an abnormal format occurs while 
ignoring records already received correctly. A NAK is sent, 
after which the count of records to ignore (previously received 
correctly) is incorrect, resulting in lost or duplicate records, 
The patch below will correct the problem. 


PROCEDURE : 


1. This is a patch to the RSTS/E 2780 package. It should be 
installed on all RSTS/E V0O6A-02 system configured for the 
2780 Emulator. 


2. Obtain a listing of the RSTS load map. This map was printed 
during System Generation if a line printer was available at 
that time. Otherwise, the map must be printed from the LICIL 
tape created at System Generation time (DECtape or magtape 
distribution) or from the System Generation DECpack (RK 
distribution). If obtaining the map from tape media, print 
the file RSTS.MAP from the LICIL tape using PIP under RSTS/E, 
the System Generation monitor, or any DOS monitor, If the 
medium is DECpack, use extended PIP under RSTS/E with the 
/DOS switch to print the file RSTS.MAP from account fi,i] on 
the System Generation DECpack, Alternatively, bootstrap the 
System Generation DECpack, LOGIN under account [1,1], and use 
PIP under DOS to print the file, 


3. On the first or second page of the RSTS map under the heading 
"Program Section Allocation Synopsis" find the sections 
<Z.USER> and <PATCH> . Record the first number to the right 
of the section name (first column of numbers). 


SOFTWARE PRODUCT VERSION 
RSTS/E 2780 Emulator VO6A-02 
COMPONENT VERSION 
2780 Package Patches N/A 
SUBPROGRAM OR ADDITIONAL INFORMATION SEQUENCE 
8.2.2 1 2 
NEW REPLACEMENT ARTICLE ORIGINAL DATE 
= December 1975 
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[Z.USER] = 


[PATCH] = 


4. Bootstrap the RSTS/E system disk normally to load the 
Initialization Code into memory. Then use the PATCH option 
of the INIT code to install the patch as shown below. 

OPTION: PATCH 

MODULE NAME? RSTS 

BASE ADDRESS? [Z.USER] 

OFFSET ADDRESS? 3276 

MODULE BASE OFFSET OLD NEW? 

RSTS [Z.USER] 003276 005367 ? 004737 

RSTS [Z.USER] 003300 000660 ? £4x[PATCH]+164 Octal Addition 

RSTS [Z.USER] 003302 112767 ? TC CONTROL/C Exit 


OPTION: PATCH 
MODULE NAME ? RSTS 


BASE ADDRESS ? [PATCH] 

OFFSET ADDRESS ? 164 

MODULE BASE OFFSET OLD NEW ? 

RSTS [PATCH] 000164 000000 ? 005337 

RSTS [PATCH] 000166 000000 ? [Z.USER]+4162 Octal Addition 
RSTS [PATCH] 000170 000000 ? 063737 

RSTS [PATCH] 000172 000000 ? [Z.USER]+4162 Octal Addition 
RSTS [PATCH] 000174 000000 ? [Z.USER]+4160 Octal Addition 
RSTS [PATCH] 000176 000000 ? 000207 

RSTS [PATCH] 000200 ?27777? ? 7C CONTROL/C Exit 

OPTION: 


SOFTWARE PRODUCT 
RSTS/E 2780 Emulator VO6A-02 
COMPONENT VERSION 
2780 Package Patches N/A 
SUBPROGRAM OR ADDITIONAL INFORMATION SEQUENCE 
8.2.2* 
NEW REPLACEMENT ARTICLE 


VERSION 


PAGE 
2OF 2 


ORIGINAL DATE 
December 1975 
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2780 Handler Failure on NAK/TIMEOUTs 


The 2780 package will return a "2780 HANDLER FAILURE" error 
message if a NAK or TIMEOUT occurs with a one block transmission. 
The patch described below will check for a NAK/TIMEOUT error on a 
Single block file and return a "NAK/TIMEOUT ON LINE" error message 
if it occurs. 


PROCEDURE: 


1. This patch should be installed on all V0O6A-02 systems which 
include the 2780 package. 


O% Obtain a listing of the RSTS load map. This map was printed 
during System Generation if a line printer was available at 
that time. Otherwise, the map must be printed from the LICIL 
tape created at System Generation time (DECtape or magtape 
distribution) or from the System Generation DECpack (RK 
distribution). If obtaining the map from tape media, print 
the file RSTS.MAP from the LICIL tape using PIP under RSTS/E, 
the System Generation monitor, or any DOS monitor. If the 
medium is DECpack, use extended PIP under RSTS/E with the /DOS 
Switch to print the file RSTS.MAP from account [1,1] on the 
System Generation DECpack. Alternatively, bootstrap the 
System Generation DECpack, LOGIN under account [1,1], and use 
PIP under DOS to print the file. 
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Handler Failure on NAK/TIMEOUTs 


OPTI 
MODU 
BASE 
OFFS 
MODU 
RSTS 
RSTS 
RSTS 
RSTS 
RSTS 
RSTS 
RSTS 
RSTS 
RSTS 
RSTS 
RSTS 


SOFTWARE PRODUCT VERSION 

RSTS/E 2780 EMULATOR VO6A-02 
COMPONENT VERSION 

2780 PATCHES . N/A 
SUBPROGRAM OR ADDITIONAL INFORMATION SEQUENCE 
8.2.3* 


On the first or second page of the RSTS map under the heading 


"Program Section Allocation Synopsis" find the sections 
<Z.USER> and <Z.TAP> . Record the first number to the right 
of the section name (first column of numbers). 

[Z.USER] = 

[Z.TAP] = 


Bootstrap the RSTS/E system disk normally to load the 
Initialization Code into memory. Then use the PATCH option of 
the INIT code to install the patch as shown below. 


ON: PATCH 

LE NAME? RSTS 

ADDRESS? [Z.TAP] 

ET ADDRESS? 1170 

LE BASE OFFSET OLD NEW? 


[Z.TAP] 001170 000040. 2? 000020 

[Z.TAP] 001172 000014 ? 000010 

[Z.TAP] 001174 000562 ? <LF> No Change 
[Z.TAP] 001176 032762 ? <LPF> No Change 
[Z.TAP] 001200 002000 ? <LF> No Change 
[Z.TAP] 001202 000006 2? <LF> No Change 
[Z.TAP] 001204 001556 2? <LF> No Change 
[Z.TAP] 001206 032762 2? <LF> No Change 
[Z.TAP] 001210 000040 2? 000020 

[Z.TAP] 001212 000014 2? 000010 

[Z.TAP] 001214 001404 ? Tc CONTROL/C Exit 


PAGE 
2 OF 4 


NEW REPLACEMENT ARTICLE ORIGINAL DATE 
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2780 Handler Failure on NAK/TIMEOUTsS 
OPTION: PATCH 
MODULE NAME ? RSTS 
BASE ADDRESS ? [Z.TAP] 
OFFSET ADDRESS? 3654 
MODULE BASE OFFSET OLD NEW ? 
RSTS [Z.TAP] 003654 074000 ? 074020 
RSTS ([Z.TAP] 003656 000010 2 Tc CONTROL/C Exit 
OPTION: PATCH 
MODULE NAME ? RSTS 
BASE ADDRESS ? [Z.USER] 
OFFSET ADDRESS ? 002012 
MODULE BASE OFFSET OLD NEW ? 
RSTS [Z.USER] 002012 012701 ? 001421 
RSTS [Z.USER] 002014 [AAAAAA] ? 012701 Old Contents Variable 
RSTS [Z.USER] 002016 012700 ? [AAAAAA] Use Previous 01d 
RSTS [Z.USER] 002020 [BBBBBB] ? 012700 Old Contents Variable 
RSTS [Z.USER] 002022 020221 ? {BBBBBB] use Previous Old 
RSTS [Z.USER] 002024 001404 ? 030221 
RSTS [Z.USER] 002026 005305 ? 001003 
RSTS [Z.USER] 002030 100374 2? 077503 
RSTS [Z.USER] 002032 000167 4G CONTROL/C Exit 
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OPTION: PATCH 

MODULE NAME ? RSTS 

BASE ADDRESS ? [Z.USER] 
OFFSET ADDRESS ? 2632 


MODULE BASE OFFSET OLD NEW ? 

RSTS [Z.USER] 002632 040000 ? 000400 

RSTS [Z.USER] 002634 000200 ? <LF> No Change 

RSTS [Z.USER] 002636 000400 ? 040000 

RSTS [Z.USER] 002640 040400 ? <LF> No Change 

RSTS [Z.USER] 002642 000000 ? <LF> No Change 

RSTS (Z.USER] 002644 22777? ? <LF> Old Contents Variable 
RSTS [Z.USER] 002646 277777 ? <LF> No Change 

RSTS [Z.USER] 002650 [XXXXXX] ? <LF> [XXXXXX] used below 
RSTS [Z.USER] 002652 ?2727?? ? <LF> No Change 

RSTS [Z.USER] 002654 [yYYyYyYYY] ? as [YYYYYY] used below 
RSTS [Z.USER] 002656 27297? aT CONTROL/C Exit 


OPTION: PATCH 

MODULE NAME ? RSTS 

BASE ADDRESS ? [Z.USER] 
OFFSET ADDRESS ? 2650 


MODULE BASE OFFSET OLD NEW ? 
RSTS [Z.USER] 002650 [(XXXXXxX] ? [YYYYYY] From above 
RSTS {[Z.USER] 002652 27772? 2 DC CONTROL/C Exit 


OPTION: PATCH 

MODULE NAME ? RSTS 

BASE ADDRESS ? [Z.USER] 
OFFSET ADDRESS ? 003770 


MODULE BASE OFFSET OLD NEW ? 

RSTS (Z.USER] 003770 177020 ? 177542 

RSTS [Z.USER] 003772 001002 Pan CONTROL/C Exit 
OPTION: 
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Receive Error Messages and Crashes Caused by the 2780 Package 


When a delay occurs in processing received data, 
Z.USER is unable to inform 2Z.TAP of the proper 
acknowledge. If three seconds lapse, the transmitting 
station requests a response. Since Z.USER has not 
notified Z.TAP of the acknowledge, Z.TAP sends’ the 
previous response. The transmitting side then resends 
the last block, which is still being processed by the 
receiver. This can result in duplicate records, a kernel 

mode trap through four (which will crash the system), a 

Line Disconnect error message, or a Remove System Nonresponding 

error message. The problem is corrected by the following patch. 


PROCEDURE: 


1. This is a patch to the BISYNC protocol module 
(Z. TAP) in the 2780 handler. It should be 
installed on all RSTS/E VO6A-02 systems which are 
configured for the 2780 package. 


2. Obtain a listing of the RSTS load map. This map 
was printed during System Generation if a line 
printer was available at that time. Otherwise, 
the map must be printed from the LICIL tape 
created at System Generation time (DECtape or 
magtape distribution) or from the System 
Generation DECpack (RK distribution). If 
obtaining the map from tape media, print the file 
RSTS.MAP from the LICIL tape using PIP under 
RSTS/E, the System Generation Monitor, or any DOS 
monitor. If the media is DECpack, use PIP with 
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the /DOS switch under RSTS/E to print the file 
RSTS.MAP from account [1,1] on the System 
Generation DECpack. Alternatively, bootstrap the 
System Generation DECpack, LOGIN under account 
{1,1J, and use PIP under DOS to print the file. 


On the first or second page of the RSTS map under 
the heading "Program Section Allocation Synopsis" 
find the tag <Z.TAP> and <Z.SCIP>. Record the 
first number to the right of the section name 
(first column of numbers). 


(Z.TAP] = 


(Z,SCIP]< 


There is a small amount of dead space between the 
parity memory trap code and the system stack area. 
Part of this area is used for this patch. The 
monitor’s normal patch area is not used. 
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5. Bootstrap the RSTS/E system disk normally to load 
the initialization code into memory. Then use the 
patch option of the INIT code to install the patch 
as shown below. 


OPTION: PATCH 

MODULE NAME? RSTS 
BASE ADDRESS? [Z.TAP] 
OFFSET ADDRESS? 340 


MODULE BASE OFFSET OLD NEW? 

RSTS ([Z.TAP] 000340 042762 ? 000137 

RSTS [Z.TAP] 000342 000020 ? 001650 

RSTS [Z.TAP] 000344 000012 ? TC CTRL/C Exit 


OPTION: PATCH 
MODULE NAME ? RSTS 
BASE ADDRESS ? [Z.TAP] 
OFFSET ADDRESS ? 3222 


MODULE BASE OFFSET OLD NEW? 

RSTS (Z.TAP] 003222 004767 ? 004737 

RSTS [Z.TAP] 003224 27277727 ? 001670 

RSTS (Z.TAP] 003226 000207 7? TC CTRL/C Exit 


OPTION: PATCH 

MODULE NAME ? RSTS 
BASE ADDRESS ? [Z.TAP] 
OFFSET ADDRESS ? 6374 


MODULE BASE OFFSET OLD NEW? 

RSTS {Z.TAP] 006374 032762 ? 000137 

RSTS ([Z.TAP] 006376 000400 ? 001704 

RSTS (Z.TAP] 006400 000006 ? TC CTRL/C Exit 
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OPTION: 


PATCH 


MODULE NAME ? RSTS 


BASE ADDRESS ? 0 


OFFSET ADDRESS ? 1650 


MODULE 
RSTS 
RSTS 
RSTS 
RSTS 
RSTS 
RSTS 
RSTS 
RSTS 
RSTS 
RSTS 
RSTS 
RSTS 
RSTS 
RSTS 
RSTS 
RSTS 
RSTS 
RSTS 
RSTS 
RSTS 
RSTS 
RSTS 
RSTS 
RSTS 
RSTS 
RSTS 
RSTS 
RSTS 
RSTS 


BASE 

000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 


NEW 
ea 


OFFSET 
001650 
001652 
001654 
001656 
001660 
001662 
001664 
001666 
001670 
001672 
001674 
001676 
001700 
001702 
001704 
001706 
001710 
001712 
001714 
001716 
001720 
001722 
001724 
001726 
001730 
001732 
001734 
001736 
001740 


OLD 

000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000900 
900000 
0009000 
000000 
000000 
000000 


ES) 


NEW? 
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042762 
000020 
000012 
042762 
000004 
000010 
000137 
(Z.TAP]+346 
004737 
(Z.SCIP]+1156 
052762 
000004 
000010 
000207 
032762 
000400 
000006 
001002 
000137 
[Z.TAP]+6420 
032762 
000004 
000010 
001402 
000137 
(Z.TAP]+6404 
000137 
[Z.TAP]+7144 
TC CTRL/C Exit 


VERSION 


PAGE 
a OF a 
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IMPROPER ZEROING OF LARGE BUFFER 


PROBLEM: when zeroing a large buffer to be used as a line table, 
the 2780 loops ones two often and zeroes the location directly in 
front of the buffer. If this location is the system mapping 
register, the system will crash. 


DISPOSITION: This patch should be installed on all VO6A-02 

systems which are configured with the 2780 Handler. 

1. Obtain a listing of the RSTS load map. This map was printed 
during System Generation if a line printer was available at 
that time. Otherwise, the map must be printed from the LICIL 


tape created at System Generation time (DECtap® or magtapes 
distribution) or from the System Generation DECpack (RK 


distribution). If obtaining the map from tape media, print 
the file RSTS.MAP from the LICIL tape using PIP under RSTS/E, 
fhe System Generation monitor, or any DOS monitor. If the 


medium is DECpack, use extended PIP under RSTS/E with the 
/DOS switeh to print the file RSTS.MAP from account [1,1] on 
the System Generation DECpack. Alternatively, bootstrap the 
System Generation DECpack, LOGIN under account [1,1], and use 
PIP under DOS to print the file. 


2. On the first or second page of tne RSTS map under the heading 
"Program Section Allocation Synopsis" find the tag <Z.SCIP>. 
Record the first number to the right of the section name 
(first column of numbers). 


([Z.SCIP] = 

3. Bootstrap the RSTS/& system disk normally to load the 
Initialization Code into memory. Then us® the PATCH option 
of the INIT code to install the patch. 

OPTION: PATCH 

MODULE NAME? RSTS 

BASE ADDRESS? [Z.SCIP] 

OFFSET ADDRESS? 1440 

MODULE BASE OFFSET OLD NEW? 

RSTS [Z.SCIP] 001440 103375 ? 101375 

KSTS [Z.SCIP] 001442 010263 ? tc CTRL/C Exit 

OPTION: 
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RUNNING THE 2780 ON A DUP11 INSTEAD OF A DU11 


PROBLEH: The RSTS/E 2780 must nake 3 sets of changes to the in- 
terrupt service routine in order to run with a DUP11 instead of a 
DU11. 


The DUP11 is a recently announced synchronous communications in- 
terface which is capable of both character (DDCMP or BISYNC) and 
bit (SDLC) oriented communications. The released version of the 
RT11 2789 supports the DUP11 as well as the DP11 and DUI1. The 
RSTS/E 2780 will not have a special DUP11 version but the DU11 
version can be vasily patehed to run using a DUP11. Similar patches 
are available for the RSX-11 2780 packages. 


DISPOSITION: This patch should be installed on any VO6A~-02~ sys- 
tems which are configured with the 2780 Handler for a DU11 and 
are actually being run with a DUP11. 


1. Obtain a listing of the RSTS load map. This map was 
printed during System Generation if a line printer was 
available at that time. Otherwise, the map must be 
printed from the LICIL tape created at System Generation 
time (DECtape or magtape distribution) or from the Sys- 
tem Generation DECpack (RK distribution). If obtaining 
the map from tape media, print the file RSTS.MAP from 
the LICIL tape using PIP under RSTS/E, the System Genere 
ation monitor, or any DOS monitior. If the media is 
DECpack, use PIP with the /DOS switch under RSTS/E to 
print the file RSTS.MAP from account [1,1] on the System 
Generation DECpack or bootstrap the System Generation 
DECpack, LOGIN under account [1,1], and use PIP under 
DOS to print the file. 
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2. On the first or second page of the RSTS map under the 


heading "Program 


Section Allocation Synopsis" find the 


tag <Z.ISR> and record the first number to the right of 
the section name (first column of numbers). 


[Z.ISR] 


3. Bootstrap the RSTS/E system disk normally to load the 
initialization code into memory. Then use the patch op- 
tion of the INIT code to 


below. 


OPTION: PATCH 

MODULE NAME? RSTS 
BASE ADDRESS? [Z.ISR] 
OFFSET ADDRESS? 40 


MODULE BASE OFFSET 
RSTS [Z.1ISR] 000040 
RSTS [Z.ISR] 000042 


OPTION: PATCH 

MODULE NAME? RSTS 
BASE ADDRESS? [Z.ISR] 
OFFSET ADDRESS? 726 


MODULE BASE OFFSET 
RSTS [Z.ISR] 000726 
RSTS {Z.ISR] 000730 
RSTS (Z.ISR] 0007 32 


OPTION: PATCH 

MODULE NAME: RSTS 
BASE ADDRESS? [Z.ISR] 
OFFSET ADDRESS? 1240 


MODULE BASE OFFSET 
RSTS [Z.ISR] 001240 
RSTS [Z.ISR] 001242 
RSTS [Z.1ISR] 001244 


RSTS/E 2780 EMULATOR VO6A-02 
2780 PATCHES 


OLD 
036062 
000009 


OLD 

112762 
000377 
000006 


OLD 

112763 
000377 
900006 


install the patch as shown 


NEW? 
? 101062 
2 tc CTRL/C Exit 


NEW? 
? 012762 
2 000777 
2 tc CTRL/C Exit 


NEW? 

? 012763 

2? 000777 

? $C CTRL/C Exit 
Seq 8.2.6* 
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2780 TIMING OUT IN RECEIVE MODE 


The 2780 Package goes into a hang condition and "times out" after 
60 seconds. The program aborts with a REMOTE SYSTEM NOT RESPONDING 
error message. 


This patch should ke installed on any V06A-02 systems which are 
running the 2780. ***This patch assumes and requires the previous 


insertion of the patch outlined in the previous Software Dispatch 
article Seq 8.2.2.*** 


1. Obtain a listing of the RSTS load map. This map was printed 
during System Generation if a line printer was available at 
that time. Otherwise, the map must be printed from the LICIL 
tape created at System Generation time (DECtape or magtape 
distribution) or from the System Generation DECpack (RK dis- 
tribution). If obtaining the map from tape media, print the 
file RSTS.MAP from the LICIL tape using PIP under RSTS/E, the 
System Generation monitor, or any DOS monitor. If the medium 
is DECpack, use extended PIP under RSTS/E with the /DOS 
switch to print the file RSTS.MAP from account [1,1] on the 
System Generation DECpack. Alternatively, bootstrap the Sys- 
tem Generation DECpack, LOGIN under account [1,1], and use 
PIP under DOS to print the file. 


2, On the first or second page of the ASTS map under the heading 
"Program Section Allocation Synopsis" find the tag <Z.USER>. 
Record the first number to the right of the section name 
(first column of numbers). 


[Z.USER] = 


3. Bootstrap the RSTS/E system disk normally to load the Ini- 
tialization Code into memory. Then use the PATCH option of 
the InIT code to install the patch. 
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OPTION: PATCH 

MODULE NAME? RSTS 

BASE ADDRESS? [Z. USER] 
OFFS&T ADDRESS? 3270 
MODULE BASE OFFSET 
RSTS [Z.uUSER] 003270 
RSTS LZ.USER] 003272 
RSTS [Z.USER] 003274 


OPTION: PATCH 

MODULE NAME? RSTS 

BASE ADDRESS? 0 

OFFSET ADDRESS? 1740 
MODULE BASE OFFSET 
RSTS 000000 001740 
RSTS 000000 001742 
RSTS 000000 001744 
RSTS 000000 001746 
RSTS 000000 001750 
RSTS 000000 001752 
RSTS 000000 001754 
RSTS 000000 001756 
RSTS 000000 001760 
RSTS 000000 001762 
RSTS 000006 001764 


OPTION: 


OLD 
032701 
140000 


OLD 

000000 
000000 
000000 
000000 
000000 
000000 
060000 
000000 
000000 
000000 
000000 


RSTS/E 2780 EMULATOR VO6A-02 


2780 PACKAGE 


2 
iy 


001740 
tc CTRL/C Bxit 


NEW? 


9 


OAD ND ND DD 0 od 8 ey on 


032701 

140000 

001005 

032701 

030000 

001002 

000137 
[Z.USER+3312] 
000137 

per epen ese re] 
C CTRL/C Exit 


Seq 8.2.7* 
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July 1976 


SOFTWARE DISPATCH tics 


Incorrect Build Directions for Nine-Track Magtape Distribution of 
SORT 


PROBLEM: 

The build directions given in the SORT User's Guide (DEC-11-ORSGA-A-D) 
do not work with nine-track magtape distribution of SORT. 

DISPOSITION: 

There is an error in the RSTS-11 SORT package nine-track magtape dis- 
tribution kit (DEC-11-ORSOA-B-MA9). According to the build directions 
in the SORT Manual, the SORT programs are under account [1,2]. This 
is false, since they are under account [1,24]. To correct this error 
the proper library building sequence is shown below: 

OLD MTZ: [1,24]SORT 

READY 

COMPILE SSORT< 44> 

READY 

OLD MT@: {[1,24]XQWIK 

READY 

COMPILE $XQWIK<4@> 

READY 

OLD MTZ: [1,24]SQWIK 


READY 


COMPILE SSQWIK<4@> 


SOFTWs 3= PRODUCT VERSION 
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Notes/Programming Hints 


SUBPROGRAM OR ADDITIONAL INFORMATION SEQUENCE # fess 
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READY 
OLD MT@:[1,24]MQWIK 
READY 
COMPILE $MQWIK<46> 
READY 
OLD MT@:[1,24]OQWIK 
READY 
COMPILE SOQWIK<49> 


READY 


OLD MT@:{1,24]KEYDMP 

READY 

COMPILE SKEYDMP<49> 

RUNSPIP 

PIP - RSTS V@5B~-24... 

*SORT. HLP<40><MT@: [1,24] SORT. HLP 


#42 
READY 


The error will be corrected in a future release of SORT. 


SOFTWARE PRODUCT 
RSTS-11 SORT 


COMPONENT 


VERSION 
VQ7 
VERSION 
N/A 
SEQUENCE & PAGE 
2 of 2 
9.1.1 


ORIGINAL DATE 


General Notes/Programming Hints 


SUBPROGRAM OR ADDITIONAL INFORMATION 


9-Track Magtape Distribution 


REPLACEMENT ARTICLE 
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PARTIAL KEY EXTRACTION FEATURE OF SORT DOES NOT FUNCTION PROPERLY 
(SPR 11-4157 GH) 


PROBLEM: The partial key extraction feature of SORT does not 
function properly. 


PREREQUISITES: SORT.BAS V07-03 (includes Patches 1 and 2) and 
XQWIK.BAS V07-03. 


DISPOSITION: In the source file SORT.BAS, retype the following 
lines or edit the underlined additions and modifications into the 
existing lines: 


Atyir! send VERSTON 07 ROT) O4 OTS ETSTS 
tacts 

rill’ CePyrRIGHs? 1972,73,74,79 GIGITAL EQUIPMENL COPPORAT [is 
Pb MAYRARD, MASS. 01794 

fetes 

1 FRIST "SORT VOV"#O04 = "ss 


CLUeREUSs TI4=-1%2 HE=LO0%2 X7%,87R=02 
SPRTM ET READER & INIT FLAGS 


260 KSSEUKSCIS)S SSHLEETCSS,RZFESS) 3 KESPS(OR): 
KYSEPS(PUS)*232 US=ELS3 TS=PS(03)3 


IF #2<G6% THEN 950 FLSE RS=0%3 GUTG 226 
PPARTI] AL EXPRACTION = &LOCKED ONLY 


Recompile the resulting source program. 
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SORT RESTRICTS THE LENGTHS OF FILE SPECIFICATIONS (SPR 11-4261 GH) 


PROBLEM: SORT restricts the lengths of file specifications unneces- 
sarily. The correction given here will permit longer specifications 
and, therefore, will permit the use of logical device names. 


PREREQUISITES: SORT.BAS V07-04 (includes patches 1, 2, and 3). 


DISPOSITION: In the source file SORT.BAS, retype the following 
lines or edit the underlined additions and modifications into the 
existing lines: 


PLLLi! SORT VERSION 07 EDIT 05 QZ/19/75 
trot 

Plr'!)) CupPYRIcHT 1972,73,74,75 GFIGITAL BOGULPMENT CORPDRATICS: 
Lees ae MAYNARD, FASS, 01754 

Hees a ea 

15 PRINT "SURE VO7T"#05 © "XS3 


CAUSBOR: C7SR91S2 neT10032 X7%,S7Z=0R 
PPRIWNT HEADER & INIT FLAGS 


160 KOZ, bE=0% 

224 JE LERCKS)>127% GUTO 90 

301 X$=rhhs(1S): FSCOSZI=AN$! GUTU 316 
830 CEE FRES(XS)3 


QO" £RKROP GOTO 8353 UPKiy XS AS FILE 104: 
UN ERROR GOT 8365 Gkt 810% FKFCURD 


ag 


Recompile the resulting source program. 
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KEYDMP Will Not Return Properly to SORT 
oe en FOperly to. sORT 


PROBLEM: 


If the SORT modules are stored on some arbitrary account for 
general use, then KEYDMP will not return properly to SORT. 


SOLUTION: 


In SORT.BAS, make the underlined change in line 126 and update 
lines 1 and 15 to indicate EDIT 93. 


tote’ Vv GAR4 VERS] Ot O07 EDA? 03 01/03/75 GJH/WKL 

pr pete 

fiisih CUoPYPRIGHT 1972,73,74,75 DIGITAL EQUIPMENT COURPURATION 

Tee ae MAYSAPD, SASS, 01754 

ve ete 

15 PRIGT "SUPT VO7"63 © "XSi C1¥=O0%: T7k=-1%!: HS=100%!: X7%,87%=03 
IPRI®&Y HEADER & Teil? FLAGS 

126 KSSK9OS+D9OS+CVISS(5%)2 KS=SYS(CHRS (8%) 4KS$)3 


CHATS K9S 1773 
sCHAIlS TO KEYDeP UTILITY 


In KEYDMP.BAS, make the underlined change in line 32999 and update 
lines 1 and 29% to indicate EDIT #2: 


Tithe) KEYOSE VERSIO® 07 FOIT 02 01/03/75 GUH/WKL 
rpidad 

Litiii  CopyPIGHT 1972,73,74,75 DIGITAL EQUIPFENT CURPORATION 

ee ee RAYwRRD, MASS. 01754 

ina t4 

2000 PRINT " KRYVMP VO7=02": RETURN SPRINT HRADER 
32900 Fi EPROR GOTM O: CLOSE 1,2: 1F S7%=0% THEN 32767 


ELSE RS=S¥YSCCKKS(7%))3 JS=INSTR(1%,KS,CHKS(132%)): 
RYISSLFFYCKS,J%912)2 ROSECVISACHINCKS, J%4+1%,2%) 2 
CHATR ROS Gg 

PRETOURE Th CALLER IF CALLED 


SOFTWARE PRODUCT 
COMPONENT VERSION 
SUBPROGRAM OR ADDITIONAL INFORMATION SEQUENCE PAGE 
NEW REPLACEMENT ARTICLE ORIGINAL DATE 
a 


VERSION 
V67 


28] 
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Fatal BASIC-PLUS Errors in MQWIK 


PROBLEM: 


Certain file allocation problems can cause fatal BASIC-PLUS errors 
in module MQWIK or may be reported incorrectly. 


SOLUTION: 
In SORT.BAS, add the underlined statement below to line 492: 


492 P%(%%)=-P% (Ps) 
PRINT "SORTING ... etc. 


Update lines 1 and 15 to indicate EDIT $2. The changed lines will 
then be: 


SURT VERSTOCR O07 FOTP ©? J1/02/75 GJIH/NKL, 


COPYRIGHT 1972,73,74,75 DIGITAL EQUIPMENT CORPORATION 
MAYS APU, MASS. 91754 


PRINT "SORY VO7=O02 = "XS? CIZ=0%2 T74e"1%2 HS=100%3 X7%,S7%S02% 
SPRITE YT HEACER & INI?V FLAGS 

P4(0% )="bR(0%): 

PRIET “"SOPLTING FRROE =" p= 
LF PE (0F)<S002 THEN 1940 
FLSkE LF P&CC%)<1000% Thew 1934 
RESE 19590 

fyORB FILE OPRE, KE GPER,OF URE 


726 
ane 


T 
Md 


In MOWIK.BAS, add the underlined statement below to line 16% after 
the ON ERROR GOTO: 


168 FOR... etc. 


ON ERROR GOTO 32795: I8%=%: 
PUT ... etc. 


SOFTWARE PRODUCT VERSION 
RSTS-11 SORT V7 


COMPONENT VERSION 
MOQWIK VG7-G1 
SUBPROGRAM OR ADDITIONAL INFORMATION SEQUENCE PAGE 
1 oF 2 
9.4.1 
NEW REPLACEMENT ARTICLE ORIGINAL DATE 
CL] 
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April 1975 


Fatal BASIC-PLUS Errors in MOWIK 


Update lines 1 and 4% to indicate EDIT $2. The modified lines will 


then be: 
Litill moQwdk VER SIG G7 EDIT v2 01/02/75 GUH/WKL 
pyeeretousd 
thiial COPYRIGHT 1972,73,74,75 DIGITAL EQUIPBENT CORPORATION 
Vii MAYNARD, “ASS, 01754 
peaddded 
40 PRET # MOWIK VO7"*02"3 JTF T7% 
169 FOR JR20% TO MiSs PRCLS¥F5S4143)=L SCTE) EPEC LT RFOS+15%) 3 


V2R=1%4¥5%412%2 GOSUR 29560: NEXT 1%% 
O9S=SYS(CHKS (6%) 4CHRS (98S) +CHRS (P%(18%)))3 

ON FRREOR GOTO 32705: Tk&=0%8 

PUP #8P2(13%) RECORD CVTS&(MID(098 ,8%,1%3)4+MIN(098,7%,1%))3 
OH FERORF GOTO Cs 

SUPER & PRESALIT OC 


NOTE: Only Version V@7-@1 of RSTS-11 SORT is now being supported. 


SOFTWARE PRODUCT VERSION 
RSTS-11 SORT V27 
COMPONENT VERSION 
MOWIK VO7-B1 
SUBPROGRAM OR ADDITIONAL INFORMATION SEQUENCE PAGE 
9.4.1 2 OF 2 


NEW REPLACEMENT ARTICLE ORIGINAL DATE 


Lea 
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December 1974 


Extra Block in Output File When SORTing Type 1 File Without Header 


PROBLEM: 


When SORTing a type 1 file without a header and the last block is full, the 
reordered output file has one extra block with junk in it. (Type 1 files with 
headers work correctly.) 


SOLUTION: 


In the program "OQWIK" at line 1299 after "ELSE," insert the underlined 
code below in place of the distributed code. 


1298 = ZP$="": ZPS=ZPS+CHR$ (G%) FOR I%=1% TO 32%: ZO%=LEN (ZG$) : 
ON ERROR GOTO 32735: IF B%<%% THEN 1259 
ELSE IF B%>1% THEN J7%=1% ELSE J7%=9% 


1291 V1%=(P% (9%) -7 7%) /P% (15%) -P% (14%) /P% (15%) +2%: 
IF V1%>9% THEN PUT #P%(13%) RECORD V1% ! FORGET SMALL FILES 


It is recommended that lines 1 and 29 also be updated to indicate that 
the modified OQWIK is considered to be EDIT 2. 


SOFTWARE PRODUCT VERSION 
RSTS-11 SORT V67 
COMPONENT VERSION 
OQWIK VG7-G1 
SUBPROGRAM OR ADDITIONAL INFORMATION SEQUENCE 


9.5.1 
NEW REPLACEMENT ARTICLE 


ORIGINAL DATE 


PAGE 
7 OF oy 
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SQWIK Destroys Key File Header 


PROBLEM: 

When no records require sorting, SQWIK destroys the key file 
header. 

SOLUTION: 

In SQWIK.BAS, add the underlined modifier clause to line 29519: 


29518 PUT ... )+1% UNLESS P%(V2%)<6% 
: RETURN 


Update lines 1 and 15 to indicate EDIT @2. 


The modified lines will then be: 


abies!  SQWIK VERSION 07 EDIT 02 01/02/75 GJH/WKL 
rheggs 
Sit!!! COPYRIGHT 1972,73,74,75 DIGITAL EQUIPMENT CORPORATION 
preyed! MAYNARD, MASS. 01754 
phards 
15 PRINT * SQWIK VO7~02"3; IF T7% 
29510 PUT #P&%(V2%41%) RECORD P&(V2%)/PS(V2%43%)+1% UNLESS P&(V2%)<0% 
$ RETURN 


SOFTWARE PRODUCT VERSION 
COMPONENT VERSION 
SUBPROGRAM OR ADDITIONAL INFORMATION SEQUENCE PAGE 


NEW ae ree ARTICLE 


Lx] 
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SQWIK Loops or Uses Undue Amounts of Time to SORT 


PROBLEM: 

When a file contains many identical records (keys), SQWIK may 
get stuck in a loop or generally use undue lengths of time to 
sort. 

SOLUTION: 


In SQWIK.BAS, add the underlined statement below to line 349: 


348 GOTO 200 IF Y%=S%(SM%) : 
S% (SP%+1B)= ... etc. 


And alter line 2922@ as underlined below: 
29228 DEF FNGS( ... :FNGS=V2S+"" : FNEND 
Update lines 1 and 15 to indicate EDIT 43. 


The modified lines will then be: 


Tiftt! SystK VeRSTON 97 EDIT 03 01/92/75 GJH/ ek L 
;ettda 

Pelbllo CoPyRIGHT 1972,73,74,75 DIGITAL ECUIEMEST CORPORATION 

ee eae MAYMARID, ASS, 01754 

een 

15 PRET " SOw TK VO7"C3"s JR V7 

34 GOT] 200 Tk VRESE(SO8 


2 Sé(S0#41%)=S3(60%) § SECSG2)EYE £ SOR=ESUS4I% ¢ GOTO 126 
1 SUESTIVOTR 2 PRs PARTITV ASS FUP LRE LD tiok 
29299 GER FT CS(VLA,V2%)3 GOSUE 29416: PuCSEVZS4e""s FHEND 


SOFTWARE PRODUCT VERSION 
COMPONENT VERSION 
SUBPROGRAM OR ADDITIONAL INFORMATION SEQUENCE PAGE 
NEW REPLACEMENT ARTICLE ORIGINAL DATE 
oie ee 
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May 1976 


ALGORITHM PROBLEM (SPR 11-5037 GH) 


PROBLEM: SQWIK is unable to sort a file in which most of the records 
are in proper sequence. 


DISPOSITION: Make the following changes to SOQWIK.BAS, including the 
correction of the edit level. 


PiLpilt  Sowle VERSLON U7 BDT1T 64 76/03/10 

bared 

Pry)! COPYFIGHT 1972,73,74,75,76 DIGITAL FOUIPPRGT CURKPORATION 
Pore MAYNARD, YASS, 01754 

pear 

15 PRINT" SQOv 1k VOT*O4"; Tk T1% 

120 SOT 60 JF SGaKO% § XRESK(SO%H1%) & YSESS(SCE) 


! JUrPR TF bUwE ON WhOLE BLOCK, OTHeS SET LISILTS 
200 S0%=S0342% 2 GOTO 120 $ REPORT ONE SORTED SEGMENT & DU SUME MORF 


349 X2=S2(SO$"12) \ LF S&CSOR)*YS > YSexXe THEN SX(SOS418)=Y% \ GOTE 347 
343 XEZYS VN VY%¥2S2(S0%) \ SECSOEI=AXS 
347 SOSTSOR4EZE \ SSCSORLAI=RE V SECSOSIZYS NV GUTO 130 

PACT nee PARTITION TO THe STAC 
RSTS-11 SORT,V07 Seq 9.6.3* 
SQWIK V07-03 lof 1 


So 


SOFTWARE DISPATCH se 


March 1975 


SORTing a File Without Records 


PROBLEM: 


SORT will not process a data file without any records in it. 


SOLUTION: 
In the module XQWIK.BAS, change line 31955 to begin: 


31955 IF P%(P%)<% OR... 


SOFTWARE PRODUCT 
RSTS-11 SORT 


VERSION 
V7 
COMPONENT VERSION 
XOQWIK V07-G1 


SUBPROGRAM OR ADDITIONAL INFORMATION SEQUENCE PAGE 
1 oF 1 
9.7.1 
NEW REPLACEMENT ARTICLE ORIGINAL DATE 
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PARTIAL KEY EXTRACTION DOES NOT FUNCTION PROPERLY (SPR 11-4157 GH) 


PROBLEM: The partial key extraction feature of SORT does not func- 
tion properly. Also, certain errors during key extraction do not 
return correct data to SORT. 


PREREQUISITES: XQWIK.BAS V07-02 (includes Patch 1) and SORT.BAS 
V07-04. 


DISPOSITION: In the source file ¥QWIK.BAS, retype the following 
lines or edit the underlined additions and modifications into the 
existing lines: 


Pest X¥Gwe Tk VERSTUN G7 FLT 03 OLS 27/75 
vitae 

Plehed CebyhRicet 1972,73,74,75 FIGIIAL &UUTR MEA? CORPORATIO: 
ee MAYSARO, FASS. 01754 

pdt te 

150 eFInT « KOwIK VO7eu3"s LTR 7 


29569 J9&>} Re: [TYREE TR V2k=bSs UN BREOR GUO 32730: 
lt V2%=1% UR SS0% THRE 
QPEN PS(VZ%/5%) FEU ThePUT AS FILE BEC V2%413) 
RECURDSIZE PECV2%E4+79)/EE(V2R434R) 451788 
GOTO 298576 
PPhIT, @PEN DF 
32900 Le20%2 KS=FNGS( 123,63) 
Tee y FXTRACIIOT SURFOTIINE... 
32706 HEEDASTRC1E,R9S,195)3 
KOZECVTSSCHMLDOCRTS, 
TUSLRCLMST ROHS 41S, BYS,D9S) 412,895,098) 414, 
22))3 7 = ———— 
KOSESLEFTCEYS, HAR*1E)3 
Gull 400 
fCum’Ow FRTURN FOF GFT CORR COMMON ERRORS 


Recompile the resulting source vrogram. 


RSTS-11 SORT VO07 Seq 9.7.2* 
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XQWIK.BAS DOES NOT ACCEPT A TYPE 1 DATA FILE WITH SIX-BYTE RECORDS 
(SPR 11-4545 GH) 


PROBLEM: XQWIK.BAS does not accept a type 1 data file with six-hbyte 
records. 


PREREQUISITES: XQWIK.BAS V0Q7-03 (includes patches 1 and 2). 


DISPOSITION: In the source file XYQWIK.BAS, retype the following 
lines or edit the underlined additions and modifications into the 
existing lines: 


pee a XC Th VERS TaN G7 RL GT o4 O9L7E4779 

ee ee 

Pelbh’o COPYRP CHIT 1972,/3,749,7959 DIGITAL FOUTESEHT CURPDERAT fiw 
Lo val MAYRARD, MASS, U1754 

ae ee 

150 FR}iWT " ROWER VOTSO4"s TR 17% 


31010 R7Z2(RI2)=2%3 
JB PORK ed12% UR EGR>R1LE BND NYS<oOe OK UYRSSTZE Tekh 32716 
RISt ip K9SS1% Ok K9B>SURE THEN 32715 
BLSE [TF WR>02 AND HEECKRIS42¢)>5U8% OR HEKTS THR 32725 
PSuee LpYlInD CHECKS 


Recompile the resulting source program. 


RSTS-11 SORT V07 Seq 9.7.3* 
XOWIK.BAS V07-02 1-or ud 
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CORRECTION OF PARTIAL KEY EXTRACTION DESCRIPTION (GH) 


There is an error in the description of the Partial Key Extraction 
facility available with SORT. Please replace the second sentence of 


Section 2.7 of the RSTS-11 SORT User's Guide (on page 2-13) with the 
following: 


The user must update the total record count in the original 
unsorted data file when he appends new records to it. 


(The underlined portions represent the corrected text.) 


RSTS-11 SORT USER'S GUIDE 


Seq 9.8.1 
DEC-11-ORSGA-A-D 


lof 1 
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Creation or Reorganization Results in Infinite Loop 
Seon sesults in intinite Loop 


PROBLEM: 


If the length of an IAM KEY INDEX File bears a certain relationship 
to factors used in the hashing algorithm, creation or reorganization 
can result in an infinite loop. 


SOLUTION: 


It is necessary to prevent the use of certain sizes for the KIF. Add 
the following statement to the beginning of line 246 of IAMGEN.BAS: 


246 I%=1%+1% IF P7% (I%)=29% OR P7% (1%) =37% 
SORE aE NE) Ses OR PIS (1LS) 37% 
OR P7%(I%)=61% OR P7% (1%) =73% 
OR P7%(I%)=97% : 
F%(N1%)= ... etc. 
Also, update lines 1 and 5 to indicate EDIT #2. 


The altered lines will appear as: 


Pitelh TAaGe?. VFESJUS O12 EDIT 02 01/04/75 GJH/WKL 
(rebet te 

Llliil COPYRIGHT 1972,73,74,75 DIGITAL EOUIPME YT CORPORATION 
opel Le MAYS ARD, MASS, GL7TS4 

peigae 

5 RORERI CHES KESSSYS (CHS (ib $) €CHRS (KOK) 4+CHRS (NOS) DE 


XOSEN EDC XYOS,N3F,INSTR(V3%,X6$,CHPS(hO%) 3S) 3 
PRIsT "PTARGEE VGLe0G2 = "Fx6s 


fKis HEAGER 
235 [S51441% Lk P7&(1%)=29% OR P72(1%)=37% OK PTR(1%)=613 
OR PTSCTS)E73% OR PTS(IS)=97S: 
FRCRIS)SPISCIS) 40182 CLOSE 7&2 OS FREOR GOTU O03 
FEC(T4R)E.192 FEC SRERZR: 
TF P&CTOR SE 2e THER PRCSIRISUZKE ERCMSRISMIR 
PSR Ef PePGe To Pe] Mk 


SOFTWARE PRODUCT VERSION 
COMPONENT VERSION 
SUBPROGRAM OR ADDITIONAL INFORMATION SEQUENCE PAGE 
nace 5 cs, 
NEW REPLACEMENT ARTICLE ORIGINAL DATE 
aaa 
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Number of Records in Input Data File Calculated Incorrectly 


PROBLEM: 


IAMGEN does not correctly calculate the number of records in an 
input data file. 


SOLUTION: 


In line 229 of IAMGEN.BAS, change the reference from Il to I1% as 
underlined below: 


TASGE* VERSION (1 EDIT 03 01/04/75 GUH/WKL 


COPYRIGHT 1972,73,74,75 DIGITAL EQUIPRERT CORPORATION 
MAYNARD, MASS, 01754 


XOS=RERCOS!S XOSESYS(CHRS (NOS )4+CHRS (NGS) +CHRS (NOS) ): 
X6S=ZPIPCKYOS , N3%,INSTE (W3%,X68,CHPS (NOS) )#N3S)8 
PRINT "TAPGEN VOT#O03 = "ZXOS 

Ke HP ASIER 


IF J1<0,. THES 


JLSPEE CES ( 1% : 
/F&C1LO%)401%)2 GTA 220 


FSC 2&2) =Fh 


Tr) -* oho 


Update lines 1 and 5 to indicate EDIT 3. 


SOFTWARE PRODUCT 


VERSION 
RSTS/E Commercial Extensions VG1-G2 
COMPONENT VERSION 
TAMGEN VG1-B2 
SUBPROGRAM OR ADDITIONAL INFORMATION SEQUENCE PAGE 
10.2.2 |2 oF 1 
NEW REPLACEMENT ARTICLE ORIGINAL DATE 
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JO=CTOHN1R) *(512%/ CF S(N9S)=X9S) + 113-263 
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No Error Message Is Given If INPUT and OUTPUT Name the Same 
eee NONE. Ene Same. 


PROBLEM: 

In IAMGEN if the INPUT and OUTPUT DATA FILEs have the same name, the 
user is asked to provide the names again, but no other error message 
is printed to inform the user. 


SOLUTION: 


In IAMGEN.BAS, line 38 has to be modified as indicated by the underlining 
below: 


Pro ak: VEST Ow OF BOUT Gd N4/14/75 GIR AKL 


CORYE TER’ 2472,73,749,75 PIGITAL EGUIP YEG) COPPURATION 
PAYP AFD, WASS, 01754 


MORSE TCHAD VOS=SYS( CHES CR BOS )FCHURS CP 9S) 4CnkS (02) ) 3 


b$= ( 
ROSS TO CkeOS, 3S, 1T9STRC 63%, KOS, CHS (CUS) =) 33)2 
PRE DT 87 AR Yuor=G4 = "sxosg 

Phe PR ADE R 


Tr [ToSeahs PpReA 


Tf FiVe (ibs) THES 

PRT per a SRR Sa TE Pi ISSUE SY’ Pie 36 

Ruoh PRpOP "PECREATER FILE"? 8 LF FRITS<>"YES" THEW C2%=0% 
SChRCE ahs ORR CRC ENTS TER bys TOs 


Note that lines 1 and 5 should also be modified to indicate EDIT @4. 


VERSION 
VG1 


SOFTWARE PRODUCT 
COMPONENT VERSION 
va 
SUBPROGRAM OR ADDITIONAL INFORMATION SEQUENCE PAGE 
ee 
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ERROR IN DRF SIZE DURING REORG (SPR 11-4981 GH) 


PROBLEM: REORG calculates the wrong DRF size if the number of 
expansion slots is changed. 


DISPOSITION: In IAMGEN.BAS, line 235, remove the -N1%, and correct 
the edit level indicated. The corrected lines are shown below: 


es TACGr& Vir SR, G) REPT Gb Tesusgsis 

feet 

Peery Copyhleev 1472,/43,74,75,76 DIGITAL Fou PPe pe COoRPoRAT LON 
et RAyrAwS, «HES. UIIS4 

Lee ae 

5 XORERP CHRD CASSSYS (CARS (CME FECEES Ci Ga) tCnbS (RUS) D3 


YeSsr IPC AS, BR, ESTE OC Se abs CreS (sue) )o' 3473 
PRL TD Mp haGe ee voleGS = "Exe 
fei RR AP EK 
235 Pedtd (pita @ tip BeRSE STOR SLOTS PRSfRRUNZ 2 XSR ETT: 
bac 7tyskr alr IXCOM +e SE ECIUR) +9148) 
Te bo Eek CHR ATE AUR Rik CHa Obs 


RSTS/E COMMERCIAL EXTENSIONS (IAM) VOl Seq 10.2.4* 
IAMGEN V01-04 lof l 
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CERTAIN KEY INDEX FILE SIZES CAUSE INFINITE LOOP (SPR 11-8741 FH) 


The IAM functions may loop indefinitely if the Key Index File size 
equals 30, 38, 62, 74, or 98. 


Recreating or reorganizing an IAM file after the installation of 
the patch given in Article Sequence 10.2.1 will correct the Key 
Index File size. (That patch only affects the IAMGEN program. No 
other patches are required.) 


RSTS/E COMMERCIAL EXTENSIONS VO1 Seq 10.2.5 
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STRTAD ENTRY IN FDB IS NOT ALWAYS RESET (SPR 11-8871 FH) 


When using the create function of the IAMGEN program, if a file is 
used for the FDB source and no input data file is used, then the 
STRTAC (third) entry in the File Descriptor Block is not reset. 


In line 95 of the IAMGEN program, include the variable F%(N3%) after 
F%(N4%) so that they are both set equal to N1%. The line should then 
read as follows: 


95 BECP OE peveks FSCHGS) FeCe3eyet lacie oSHU" pubes fO,0b 250, Flor 
OPEN lee FUR TSPUT @S FILE Piet GhT fides 
RIEL ah la,N2% AS T0S,82% 4S Sea eae os 1283 
LOSEURCCVTSeC(LUS))2 TLR=Cviseciis): S=CVIS&ZCL2S) 


ICKAK HERADEKE 


Note that this patch need not be made if only the IAM functions and 
programs are used to access IAM files, since they do not reference 
that entry. 


RSTS/E COMMERCIAL EXTENSIONS V0O1, DMS-500 v02 Seq 10.2.6* 
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BLANK RECORDS IN A DATA FILE MAKE INDEX OPTION FAIL (SPR 11-4982 GH) 


PROBLEM: If blank records or blank keys exist in a data record 
file, the INDEX option of IAMGEN will create an invalid key index 
file. 

DISPOSITION: In IAMCRI.BAS, change line 2994@ to line 29149. 


Line 29149 will then be: 


20140 U6S=MID (U5$ ,F% (14%) -N18 , F3 (12%) ): 
IF U6$=" " THEN FNX93=N6$: 
GOTO 20330 


: RETURN UNHARMED IF BLANK KEY 


There will be no line 29949. 


RSTS/E COMMERCIAL EXTENSIONS Seq 10.3.1* 
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IAM VERIFY CANNOT HANDLE TOTALLY FULL FILES (SPR11-5032 GH) 


PROBLEM: When an IAM data record file (DRF) is full, the verify 
option of IAMGEN will fail with an end-of-file error. 


DISPOSITION: In IAMVFY.BAS, line 369, the third and last GOSUB 379 
should be changed to: 


GOSUB 379 IF E% 


Line 368 will then be as follows: 


360 L8=1%$:M%$=1% :N%=2%:0%=INT (512/F%) :GOSUB 370: 
L$=2% :M%=D%-1% :N%=1%:GOSUB 370: 
L%=D% :M%=D% :N%=1%:O0%=E%:GOSUB 370 IF E%: 
CLOSE N3%:ON ERROR GOTO 32400: 
OPEN K6$ FOR INPUT AS FILE N33 


RSTS/E COMMERCIAL EXTENSIONS (IAM) Seq 10.5.1* 
IAMVFY VO1-01 lof 1 
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Using FND% with More Than One IAM File 


PROBLEM: 

Using FND% (from IAMFNS) with more than one IAM file May not work 
properly. 

SOLUTION: 


In IAMFNS, insert at the beginning of line 25955 the following 
statement: 


V5%= (U5%+1%) /2%: 
the line will then read: 


25955 V5%=(U5%4+1%)/2%: 
IF LEN (U6$)<>U53% (V5%,12%)... 
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Records Added to IAM Files Through FNA% In Spite of the Occurrence of 
an Error 


PROBLEM: 


Although an added record has a duplicate key (or one that has 
been marked for deletion), an additional space in the Data Record 
File (DRF) is used up before the error is detected. 


DISPOSITION: 
This error only causes the loss of space in the DRF since no index 


entry points to the false record. The error is a complex one to 
avoid. A correction will be published when available. 


COMPONENT VERSION 
TAMFNS VG1-G1 


SEQUENCE PAGE 
or 1 
REPLACEMENT ARTICLE ORIGINAL DATE 
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Conversi 


For the 
VG5-21, 
to take 
Versicn 
Arithinet 


January 1975 


on of Data From the 4-Word Decimal Arithmetic Package 


users of the four-word Decimal Arithmetic package on RSTS/E 
it will be necessary to convert any numeric data in files 
advantage of the new, faster Scaled Arithmetic on RSTS/E 

5B and 5C. For those who prefer not to convert, the Decimal 
ic package is distributed with Version 5B and 5C as well. 


Under four-word floating point Scaled Arithmetic, first retrieve the 
Decimal number as if it were a normal floating point number, either 
from a virtual array or using the CVTSF function. Then apply the 


function 
floating 


FNC listed below (lines 29999-29918) to convert to the correct 
point value. The program below contains examples of both 


virtual array and CVT data conversion. 


100 OPE 
110 FOR 
120 ACI 
130 PRI 
140 NEX 
150 CLO 
200 OPE 
210 FOR 
220 FIE 


230 PRI 
240 NEX 
250 PUT 
300 GOT 
29000 D 


re) "VIRARY 4D" AS FILE 1 \ bile #1, A(10) 
1Z=0% FO 10% 

e)=FNCC ACIS) ) 

NT AC1&) 

T I% 

SE 1 

N "CVTFLL.M4D" AS FILE 1 \ GET #1, KECURD 1 
120% TU 10% 

LD #1, 8&¥*1IS AS AS, &% AS AS N 

LSEL AS=CVIFSC(C FNC( CVISFCAS) ) ) 

NT CVISFCAS) 

T 1% 
#1, RECORD 1 \ CLOSE 1 

(} 32707 

EF FNCCE) \ OSSCVTFS(CE) \ DIM 0303) N 
OSCOSIECVTSS(MID( CS, 7S-V%"903,2%)) FUR Y%=0% TO 3% \ 
V=0 \ OL=Q080US) N 
IF QO%(0%$)<0% THEN Q1=*01-1 \ 

03(0$) 290% (08) “1% FUR QO%51%3 TO 2% \ 
0S(3%)=702(3%) 


SOFTWARE PRODUCT VERSION 


Vl 


VERSION 
4-Word Decimal Arithmetic 
SUBPROGRAM OR ADDITIONAL INFORMATION SEQUENCE PAGE 
1 OF 2 
10.9.1 
NEW REPLACEMENT ARTICLE ORIGINAL DATE 
bell 


RSTS/E Commercial Extensions 
COMPONENT 


RSTS/E 


January 1975 


SOFTWARE DISPAICH 


Conversion of Data From the 4-Word Decimal Arithmetic Package 


29010 FOR Q3=1% TO 3% N 
QO2=0%(0%) VN 022024605536 IF Q2<0 \ 
G1=65536FO1+02 \ 
QOZ2=INTCQI/1IEO) \ O1FQI-1LFOFGZ N 
Q0=6553b*0+Q02 \N 
NEXT Q& \ FNC,Q=Q+QG1/1E6 \ FNC="Q0 IF 0%(0%)<03 \ 
FNEND 
32707 END ' BKREEKEEREERKE NNNNNNNNNW DDDDBDDDDD 


SOFTWARE PRODUCT VERSION 
COMPONENT VERSION 
ee ee 


SUBPROGRAM OR ADDITIONAL INFORMATION SEQUENCE PAGE 
|__ emenrenrorennnrenaen [Mean fe? 
NEW REPLACEMENT ARTICLE ORIGINAL DATE 
i ee 
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UNDERFLOW DETECTION IN FORTRAN OTS 


PROBLEM: The no hardware (NHD) version of the FORTRAN object time system 
(OTS) does not detect some cases of underflow. 


DISPOSITION: The following patch corrects the problem. 


PROCEDURE: 


1. This is a patch to the RSTS/E FORTRAN IV object time system (OTS). 
The user should keep track as to which patches have been installed 
in his OTS; there is currently no patch level indicator. 


2. Log into the system under account [1,2], the system library 
account. 


3. Mount one of the following KSTS FORTRAN distribution media on a 
free unit. 


Copy of DEC-11-LRFSA-A-HB (RK) 
DEC+11-LRFSA~A-UB2 (DECape) 
DEC-11-LRFSA-A-MB7 magtape ase 
DEC#17-LRFSA-“A=MB9 magtape (9-track 
Make the unit ready. 
3a. (RK distribution only) 


Mount the copy of the RSTS FORTRAN distribution media using the 
UTILTY program and the pack ID FORTRAN. 


yi CA 


4, Copy the NHD.OBJ module from the distribution media to the system 
device as follows: 
4a. (RK and DECtape distribution) 
RUN $PIP 
#SY:NHD.OBJ=xx :NHD.OBJ/CO:T for DECtape, 
#SY:NHD.OBJ=DKn :NHD.OBJ/CO for RK disk 
Nb. (magtape distribution) 
RUN $PIP 
#SY:NHD.OBJ=MTn:[128, 126 JNHD.OBJ/CO 
RSTS/E FORTRAN IV VO6A-02 Seq 14.1.1* 
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May 1976 


UNDERFLOW DETECTION IN FORTRAN OTS 


5. Install the patch using PATCHO as shown below. 
RUN PATCHO 

¥OPEN 

ENTER INPUT FILE*NHD.OBJ 

ENTER OUTPUT FILE*NHD.NEW 

*POINT FMULS 


Ww = 


ENTER CHECKSUM: 105326 
STOP -- 
Ready 
RUN $PIP a 

z /RE=NHD.NEW 
#tz 


6. At this point the module NHD.OBJ should be copied onto the backup 
media for possible future use. 


e.g. RUN $PIP 
#xx:NHD.OBJ=NHD.OBJ/CO where xx is the backup device. 


7. (If the NHD version of the FORTRAN OTS was built during system 
generation, then that library should be rebuilt. That procedure 
is described in the RSTS/E System Generation Manual (DEC-11-ORGNA- 
A-DN1) page 4-69, 4-70 and is reproduced below. 


Ta. Copy the files  UNI.08J,OTSCOM.OBJ,FOPEN.OBJ,V2NS.OBJ from the 
distribution media if not already in account [1,2]. e.g., 


RUN $PIP 

#SY:=MTn:[ 128,128 JUNI.OBJ/CO, OTSCOM. OBJ/CO, FOPEN. OBJ/CO, V2NS.OBJ/CO 
#SY:=DKN: UNI. OBJ/CO, OTSCOM. OBJ/CO, FOPEN. OBJ/CO, V2NS.OBJ/CO 
#SY2sDTn:UNI.OBJ/CO:T, OTSCOM. O3J/CO:T,FOPEN. OBJ/CO:T, V2NS.OBJ/CO:T 
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May 1976 


UNDERFLOW DETECTION IN FORTRAN OTS 


7b. Build the library as follows: (the underlined text is typed by 
the user; all lines are terminated with a carriage return). 


RUN $LIBR . 
TNHDETECHO> <UNI OTSCOM,FOPEN ,V2NS ,NHD/G 


ENTRY POINTS 

ERRS 

B 
<CR> (type a carriage return for the third line. It must be blank.) 
$FI0O ILL INS These are expected error messages 
END2 ILL INS which should be ingnored. 

END2 ILL INS 

sCLO2 ILL INS 

FI02 ILL INS 

FIO? ILL INS 
#tZ (type control Z here) 


38. The files NHD.OBJ, and any files brought in by step 6a may be 
deleted at the user's discretion. 
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June 1976 


NULL ARGUMENTS IN FORTRAN SUBSCRIPT LISTS 


PROBLEM: Null arguments in the last argument position of a subscript 


list are flagged as syntax errors. 


DISPOSITION: 


PROCEDURE : 


1. Tnis is a patch to the KSTS/E FORTRAN IV compiler. 


é. Log into 
account. 


Cay 


The following patch corrects the problem. 


the system under 


Create a copy of the compiler. 


RUN $PIP 
#OLDE OR. SAV=FORTRA. SAV/CO 


#1Z 


4. In the following the user types 
the carriage return key; 


denotes 


underscored 
<LF> denotes the line feed key. 


the system library 


This is the copy to be patched. 


text; <C> 


Tne resulting version of FORTRAN will be FORTRAN IV VO1C-03A. 


KUN $PATCH 

PATCH VO1-02 

FILG NANB-- 

®ULDEFOR/U< CHD 
2344s hk 

¥10: 2/ 


121527 47O7<LF> 
26 TSMMe tH 
: Ae 1527<LF> 


6<LF> 
THO2<Lr> 


VeTo27<iLr> 
<LF> 


0 oOT<Cn> 
4O 101<CR> 


RSTS/E FORTRAN IV vVO0O6A-02 


FORTRAN PATCHES 


Supersedes article dated May 1976. 


Seq 14.1.2* 
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Users should refrain fron invoking FUATHAH for tne duration of 


e 
+ OMIA, ‘ 
this next step; tne messaze Cant find file or account at line 
410 will oe zenerated if FORTHKAN.S&V is not present when either 
HUN SFONTHAN or tne FUR CCL command is used to invoke FORTRAN. 
At this point the new (patched) compiler should be made to replace 
the unpatchea version. The protection code must be chanzed to 
<t2e4>. e.e., 
hUN ¢PIP 
#ULDEUR.SAV<124>/KE 
#ECATRA. SAV/DE 
#EORTHA. SAV/HEZULDFOR. SAV 
#1Z 
6. how that the patch is installed, the patched version of FORTRAN 
should be copied onto some backup media for possible future 
patches. e.g. 
RUN $PIP 
#XX SPOURTHA. SAVEPURTKA.SAV/CO xx is the oackup DEVICE. 
RSTS/E FORTRAN IV VO6A-02 Seq 14.1.2* 
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INCORRECT PROTECTION CODES FOR UTILITIES USED DURING FORTRAN 
INSTALLATION PROCEDURES 


PROBLEM: The FORTRAN installation control file installs LNGBLD.BAC 
and UTILTY.BAC with incorrect protection codes, i.e., <232> instead 
of <124>. 


DISPOSITION: The following procedure corrects the problem. 


PROCEDURE: 


1. Log into the system under account [1,2], the system library 
account 


2. Rename the protection codes of UTILTY.BAC and LNGBLD.BAC to 
<124> using PIP as follows: 


RUN PIP 
#UTILTY .BAC<124>/RE 
#LNGBLD.BAC<124>/RE 


#tZ 
RSTS/E FORTRAN IV V06A-02 Seq 14.1.3 
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OBJECT-TIME HOLLERITH FORMAT PROBLEM 


PROBLEM: Object time format using the H format specification causes 
trap to 4, memory management violation, or other errors. 


DISPOSITION: The following patch corrects the problem. 


PROCEDURE: This is patch 2 to the RSTS/E FORTRAN IV object time 
system (OTS). The user should keep track as to which patches have 
been installed in his OTS; there is currently no patch level 
indicator. 


1. Log into the system under account [1,2], the system library 
account 


2. Mount one of the following RSTS FORTRAN distribution media ona 
free unit. 


Copy of DEC-11-LRFSA-A-HB (RK) 
DEC-11-LRFSA-A-UB2 (DECtape) 
DEC-11-LRFSA-A-MB7 magtape (7-track) 
DEC-11-LRFSA-A-MB9 magtape (9-track) 


Make the unit ready. 
2A. (RK Distribution only). 


Mount the copy of the RSTS FORTRAN distribution media using the 
UTILTY program and the label FORTRAN. 


3. Copy the OTSCOM.OBJ module from the distribution media to the 
system device as follows: 


3A. (RK and DECtape distribution). 


RUN $PIP 

#SY :OTSCOM. OBJ=xx : OTSCOM.OBJ/CO where: xx = DTn for 
DECtape, DKn for 
disk cartridge. 


3B. (Magtape distribution). 
RUN S$PIP 
#SY:OTSCOM.OBJ=MTn: [128,128] OTSCOM.OBJ/CO 


RSTS/E FORTRAN IV VO6A-02 Seq 14.1.4 
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OBJECT-TIME HOLLERITH FORMAT PROBLEM 


4. In the following the user types the underscored text; lines are 
terminated by a carriage return. 


RUN PATCHO 

*OPEN 

ENTER INPUT FILE*OTSCOM.OBJ 
ENTER OUTPUT FILE*OTSCOM.NEW 
*POINT FORMAT 

*WORD 1510=#3375 

*POINT OBJFMT 

*WORD 1134=#-65300 

*WORD 1136=#4767 

*WORD 1140=#-212 

*WORD 1142=#5302 

*WORD 1144=#-77405 

*EXIT 

ENTER CHECKSUM: 67432 


STOP -- 
Ready 


RUN $PIP 
#OTSCOM. OBJ /DE=OTSCOM. NEW 


5. At this point the module OTSCOM.OBJ should be copied onto the 
backup media for possible future use, for example, 


RUN SPIP 
#xx: OTSCOM. OBJ=OTSCOM.OBJ/CO where: xx is the backup 
device. 


6. The FORTRAN library should now be rebuilt. 
That procedure is described in the RSTS/E System Generation 
Manual (DEC-11-ORGNA-A-DN1) page 4-69, 4-70 and is reproduced 
below. 


In the following, ??? represents the hardware module appropriate 
for your configuration, i.e., EIS, FIS, or FPU. 


6A. Copy the files UNI.OBJ, ???.0BJ, FOPEN.OBJ, V2NS.OBJ from the 
distribution media if not already in account [1,2]. 


RSTS/E FORTRAN IV VO6A-02 Seq 14.1.4 
FORTRAN PATCHES 2 of 3 


312 


~1L3 


RSTS/E Software Dispatch, July 1976 


OBJECT-TIME HOLLERITH FORMAT PROBLEM 


e.g. 


RUN $PIP 

#SY:UNI.OBJ=MTn:[128,128]UNI.OBJ/CO 

#SY:??? .OBJ=MTn:(128,128]272?.0BJ/co 

#SY:FOPEN.OBJ=MTn;{128,1281FOPEN.OBJ/CO 

#SY:V2NS .OBJ=MTn: [128,128]V2NS.0BJ/CO 
For magtape and 


#SY : FOPEN .OBJ=xx : FOPEN.OBJ/CO 
#SY:V2NS .OBJ=xx : V2NS .OBJ/CO 
For DECtape and disk cartridge (xx=DTn or DKn). 
For DECtape, /CO:T should be used. 


6B. Build the library as follows: 
(The underlined text is typed by the user; all lines are termin- 
ated with a carriage return.) 

RUN S$LIBR 


*FORLIB<40>=UNI,OTSCOM, FOPEN, V2NS,??2?/G 
ENTRY POINTS: 


SERRS 

SERRTB 
(Type a carriage return for the third 
line. It must be blank.) 

SFIO2 ILL INS 

SEND2 ILL INS 

SEND2 ILL INS 

$CLO2 ILL INS 

$SF1IO2 ILL INS 

SFIO2 ILL INS 

ty CTRL/Z 


7. 


The files OTSCOM.OBJ and any files brought in by step 6A may be 
deleted at the user's discretion. 
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ENCODE/DECODE WITH OBJECT-TIME FORMATTING (GH) 


Object time ENCODE/DECODE does not restore the free space pointer properly. This 
May cause illegal memory reference or other errors. 


The following patch corrects the problem. 


This is patch 3 to the RSTS/E FORTRAN IV object time system (OTS). The user should 


keep track as to which patches have been installed in his OTS; there is currently 
no patch level indicator. 


1. Log into the system under account [1,2], the system library account. 


2. Copy the file OTSCOM.OBJ from the backup media where it was stored (in the last 
patch), e.g., 


RUN SPIP 
gSVPEXxrO4SCUM,UBI/CU (XX [LS Pre BACKUP DEVIC. 
LE XX = OVENS THEN /COST MUST bk JSbvV) 


3. In the following, the user types the underscored text; lines are terminated by 
a carriage return. 


RUN PATCHO 


FUP KIN 


BvViBR LPNPUT FLLEFU1TSCUM.O0bd 


ENTER OUTPUT FLLEFUTSCUM. vEW 


ee 


SEO LW UBGEUC 


twukb lozalo/u3 


kwtikD 22=8lo340 


FwRD Z24a8)4 


sewer enw enaw es 


talikD Z2Zo=847 07 


twRD ZU=SSUKJER 4G 


ee dd oeene 
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FwORD 325412063 


*¥wURD 345814 


¥WURD 36=#103600 


#wURD 42584 


¥wORD 44=8#207 


FEXLT 


ENTER CHECKSUM: 706027 
STOP es : 
REALY 

RUN SPIP 


a#UTSCUM.UKI/REFOTSCOM, NEW 


4. AT THIS PUINT THE MUDULE UITSCOM.,UBJ SHOULD BE COPIED UNTL 
THE BACKUP MEDIA FUR POSSIBLE FUTURE USE, 


EG. KUN SPIP 
Axx: O1SCUM,UKJSUTSCOM.OBI/CU 


5. THE FURTRAN LIBRARY SHOULD NUW BE KER BUILT. 


THAT PRUCKDURE LS DESCRIBED LN THE RSIS/H SYSTEM GENERATION 
CDEC*1LIOCURGNA@A2DNL) PAGE 4°09, 4-70 AND TS KEPRODUCED BELUW. 


WHERE XX IS THE tACKUP DEVICE. 


MAWUAL 


In THE FOLLOWING, 22? REPRESENTS THR HAKDWARE 4UDULE APPRUPRIATE 


FOR YOUR CUNFIGURALLON. I.E. &1S, FIS, Uk FRU. 


5a. CUPY THE FILES UN],UBU, 2??? Utd, PURFEN UU, V2NS.JBU FROM THE 
DISTRLBUTLON MEDLA IF WUT ALREADY in ACCHuUNT (1,2). 


EG. 
RuN SPIP 


aSY:=Min2bl238,126)UNL.OBI/CU, 227? .UBU/CU, FUPEW.UBU/CU,V2NS,0bU/CU 


FOR MAGTAPE AND 
ASYS=SKKXTUN] UibU/CO, 2272? -0bU/CU, POPES. UBJ/CO, VZNS.OBJ/CU 
FUR DECTAPR AMD DISK CARTRIUGE (XX = DIN OR DKA), 


Sth. BUILD THE LIBRARY AS FULLUWS: 
CTHE UNDERLINED Tex! LS TYPED BY THE USe#R? ALL LINES ARE 
TERMIWATED WITH A CARRIAGE KETURKN). 


RSTS/E FORTRAN IV VO6A-02 
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EwlkY PulwiSs: 
SERRS 


SERRTt 


CirPe A <Ck> FUR [th THIRD Link. IT MUST BE BLANK, ) 


SFU? PLL TNS 
Stand? tii Lws 
SEan2 Ibb lis 
SCLU2 ILL lws 
Sk lu2 Lib iws 
SF 12 [Lb ltis 


HZ CLYPER CUNTKUL Z HERE) 


6. Tht FILES UISCUM.ORU AND ANY FILES BRUUGHL IN BY STEP SA mAY 
bh DELETED Al THRE USERS DISCKETIUN. 
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OPENING FILES IN APPEND MODE 


PROBLEM: CALL OPEN with mode = 2 (append mode) does not work. 


DISPOSITION: The following patch corrects the problem. 


PROCEDURE: This is patch 4 to the RSTS/E FORTRAN IV object time 


system (OTS). The user should keep track as to which patches have 
been installed in his OTS; there is currently no patch level indica- 
tor. : 


1. Log into the system under account [1,2], the system library ac- 
count. 


2. Mount one of the following RSTS FORTRAN distribution media on a 
free unit. 


Copy of DEC-11-LRFSA~-A-HB (RK) 
DEC-11-LRFSA-A-UB2 (DECtape) 
DEC-11-LRFSA-A-MB7 magtape (7-track) 
DEC-11-LRFSA-A-MB9 magtape (9-track) 
Make the unit ready. 
2A. (RK distribution only). 


Mount the copy of the RSTS FORTRAN distribution media using the 
UTILTY program and the pack in FORTRAN. 


3. Copy the FOPEN.OBJ module from the distribution media to the sys- 
tem device as follows: 


3A. (RK distribution). 


RUN $PIP 
#SY : FOPEN.OBJ=DKn: FOPEN .OBJ/CO 


3B. (DECtape distribution). 


RUN $PIP 
#SY :FOPEN.OBJ=DTn: FOPEN.OBJ/CO:T 


RSTS/E FORTRAN IV Seq 14.1.6* 
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OPENING FILES IN APPEND MODE 


3c. (Magtape distribution). 
RUN S$PIP 
#SY :FOPEN.OBJ=MTn: {128,12 8] FOPEN.OBJ/CO 
4. Copy the file OTSCOM.OBJ from the backup media where it was 
stored (in the last patch). 
e.g 
RUN $PIP 
#SY:OTSCOM. OBJ=xx:OTSCOM.OBJ/CO xx is the backup device. 
if xx=DTIn: then /CO:T 
must be used. 
5. In the following, the user types the underscored text; lines 
are terminated by a carriage return. 
RUN PATCHO 
*OPEN 


ENTER INPUT FILE*OTSCOM. OBJ 
ENTER OUTPUT FILE*OTSCOM. TMP 
*POINT SCLOSE 

*WORD 122=142 

*WORD 126=#10446 

*WORD 130=#10663 

*WORD 132=#144 

*WORD 134=#4767 

*WORD 136=#244 

*WORD 140=#775 


*WORD 142=144 

*WORD 144=#12604 

*EXIT 

ENTER CHECKSUM: 153163 

STOP -- 

Ready 
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OPENING FILES IN APPEND MODE 


RUN PATCHO 

*OPEN 

ENTER INPUT FILE*OTSCOM. TMP 
ENTER OUTPUT FILE*OTSCOM.NEW 
*POINT SCLOSE 

*WORD 404=#4767 

*WORD 406=%SGETBL+O 

*WORD 410=#16402 

*WORD 412=#2 

*WORD 414=#12705 

*WORD 416=#400 

*WORD 420=#5022 

*WORD 422=#5305 

*WORD 424=#1375 

*WORD 426=#5364 

*WORD 430=#26 

*WORD 432=#167 

*WORD 434=%SPUTBL+0 

*EXIT 

ENTER CHECKSUM: 111020 


STOP -- 
Ready 


RUN PATCHO 
OPEN 

ENTER INPUT FILE*FOPEN.OBJ 

ENTER OUTPUT FILE*FOPEN.NEW 
*POINT ROPEN > 
*WORD 574=#62 

*WORD 660=413704 


ELIADMN CFCO_LCA 
WAL UUL"tTot 


*WORD 664=#16446 
*WORD 666=#4 

*WORD 670=#4767 
*WORD 672=%SOPEN+0 
*WORD 674=#22627 
*WORD 676=#-77776 
*WORD 700=#1010 
*WORD 702=#13746 
*WORD 704=#420 
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*WORD 706=#-61132 
*WORD 710=#5 

*WORD 712=#6026 

*WORD 714=#5516 

*WORD 716=#12666 
*WORD 720=#30 

*WORD 722=#207 

*EXIT 

ENTER CHECKSUM: 40245 


STOP -- 


Ready 


RUN $PIP 
FOTSCOM. OBJ /DE=OTSCOM. NEW 
#FOPEN . OBJ/ DE=FOPEN. NEW 
#O0TSCOM.TMP/DE—~ 


6. At this point the modules OTSCOM.OBJ and FOPEN.OBJ should be 
copied onto the backup media for possible future use. 
e.g. RUN $PIP 
#xx : OTSCOM.OBJ=OTSCOM.OBJ/CO 
#xx : FOPEN.OBJ=FOPEN.OBJ/CO where: xx is the backup 
device. 
7. The FORTRAN library should now be re-built. 
That procedure is described in the RSTS/E System Generation 
Manual (DEC-11-ORGNA-A-DN1) page 4-69, 4-70 and is reproduced 
below. 
In the following, ??? represents the hardware module appropriate 
for the configuration; i.e., EIS, FIS, or FPU. 
Copy the files UNI.OBJ, ???.0OBJ, V2NS.OBJ from the distribution 
media if not already in account [1,2] as follows: 
RSTS/E FORTRAN IV Seq 14.1.6* 
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OPENING FILES IN APPEND MODE 


7A. (RK distribution). 


RUN $PIP 
#SY : UNI .OBJ=DKn :UNI.OBJ/CO 


#SY: V2NS .OBJ=DKn: V2NS .OBJ/CO 
7B. (DECtape distribution). 


RUN $PIP 
#SY:UNI.OBJ=DTn:UNI.OBJ/CO:T 


#SY :V2NS .OBJ=DTn:V2NS.OBJ/CO:T 
7C. (Magtape distribution). 


RUN $PIP 
#SY:UNI.OBJ=MTn:[(128,128]UNI.OBJ/CO 
#SY:???.OBJ=MTn:[{128,128127??.O0BJ/CO 
#SY:V2NS .OBJ=MTn:[128,128]V2NS.OBJ/CO 


8. Build the library as follows: 
(The underlined text is typed by the user; all lines are termin- 
ated with a carriage return). 


RUN SLIBR 
*FORLIB< 40>=UNI , OTSCOM, FOPEN, V2NS , ???/G 
ENTRY POINTS: 


SERRS 

SERRTB 
(type a carriage return for the third line. It must be 
blank.) 

SFIO2 ILL INS 

SEND2 ILL INS 

SEND2 ILL INS 

SCLO2 ILL INS 

$FIO2 ILL INS 

SFIO2 ILL INS 

*tZ (type CTRL/Z here) 


9. The files OTSCOM.OBJ, FOPEN.OBJ and any file brought in by step 
7 may be deleted at the user's discretion. 
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CALL OPEN OF DIRECT ACCESS FILE FAILS (GH) 


CALL UPeSN UF A® fTUlu!' FILE Pur 'kAN UU ACCESS RETURNS GARSAGE 
wibt THE 1S7 KHLOCK FRAD TS THR 1ST PHYSICAL SLUCK Je THRE Fibk, 


THE FULLUwiNG PATCH CURRECTS Tot. PROBLEM, 


THIS IS PATCH #5 TU THE RSUS7ZE ruk RAN Tv UeaJeCr Piveé SyStem (urs). 
THE USER SHOULD KEEP TRACK AS 10 WHICH PATCHES HAVE BEEN INSTALLED 
IN HIS UTS? THERE IS CURREWILY SC PATCH LRVEL INDICATOR, 


1. LUG ITn?TG THR SriSTEM UNDER ACCUUBT Li,2), THe SYSTEM LIBRARY 
ACCOUNT. 


26 COPY THE FILE FOPEN.U8J FROM THE BACKUP SEDIA CwHEPE IT WAS 
STORED if EHE LAST PATCH) LF NOT ALREADY IW ACCUUNT 11,2). 


EG. RUN SFIQF 
OSYSPOPRN.OKJEXASPUPEN SOHU/CU (KX Lo THe BACKUP DEVICE. 
TF XX = NTH? THEN /CUIT MUST BRE USED) 


3. IN THE FULLOWING THE USER TYPES THE UNDERSCURED TEXT? LINES ARE 
TERMINATED BY A CARRIAGE KFEITURKK, 


RUN SPATCHDO 


FOP EW 


EnTeR INPUT FILRFFOPEN. UBS 


ENTER QUTPUT ¢LLDE* POPPE. wkw 
*#PUINT RUPEN 


*#WORD 41lo=R#4767 


¥WORD 42058304 


¥WORD 7202852710 


WORD 740S840000 
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FeORD 732=48536v 


Ce a ed 


twko 7TIdSR20 


bie Giy Paar Di] 
WHE? FSO RLU? 


werner eecere=e 


ENTER CHECKSUMs 174020 


ewes 


Shue +9 
READY 


RUM SPIP 


ROPE N.UbU/DF 


RUPP W. ObU/SRE SE UPEN.NEY 


ee ee ee 


4, AL THIS PULNT Tne, MUDULE FORPEN.OBU SHOULD sk Cubbie Gatti 
THe BACKUP RREUTA FUR PUSSIbLE FUTURE Usk. 


bebe kU SRIF 
RAXASHUPEN UBJEROPEN UR I/CE wittRe AX 1S [Ht RACKUP 


Se THE FORKTRASK GIBRARY SHUULU BOY BR ReeKULLT, 


THAT PROCEUURE IS DESCKLBeED Th THE RKSTS/E SYSTEM Gene RAT LUN 


(DRC! LISURGNASASUNI) PAGE 4°89, 4°70 Avo ES REeROVOUCHEO Belin, 


liv TRE FOLLGeING, 22? KRPRESENTS THE dARKUWARE 4UDUDR APR RUPKIATE 


PUR YOUR CONFIGURATIGW. Tete KIS, FIS, UR FRU. 


CUPY Jk FILE UTSCUm.06bU FROM THe BACKUP HRODLA (wheke Ft was SrURED 


Is THE LAST PAICH) Te woul ALREADY Iw ACCUUANT L1,2). 


haG. RUN Skik 
RSYFUTSCUMUdJEARSOTSCUM UES CH 


OXX IS [THE BACKUP DreviCre. Lk XX = Ow dHkw /CUSE MUS) BR USeL) 


CuPyY Tne FILES Unl Ubu, 2??.0K0,VénS.U0Rbu FRUM Tak bISTRIBUTLON 


MeO LA IF NOT AbReADY Lv ACCOUNT L1,2) AS FULLGNSS 


“UUNT Unk DF THE FULLUWLEG KSTS FURYRAN DISIFIdUTLUN MEDLA 
On A FREE UNll. 


CUPY UF beCelleURFSasAthR CHK) 
DRCeLLeLRESAPATUBKS (DECTAVE) 
VDEC#LILoLRESAtAt4B7 MAGTAPE (7 TRACK) 
UEC@1TIMLFRSATASMBY HAGTAPE (9 1RACK) 


MAKE THe UNIT READY, 


FORTRAN IV/RSTS-E, VIC Seq 14.1.7* 
FORTRAN PATCHES 2 of 3 
OTS 


94. CRK VISTRIBUTI DW) 


MUtwE THE Couey OF [THE KSITS FURPRAG DISTRibJr EUs “kOLA JsiuG 


ULLLEY PRUGRAm Au Tir LABEL FURLRATS 


RUS SUTILTY 
RrMOUNT Dei t tok TRAK 
n4z 


huh SPIP 

®SY SUNT ,ORUSDK stunk D. GK U/CU 
BSV¥3?2 2? UBGEDKNS 222.0 bUs CU 
#OVeV2NS,URISUKN SV eNS.GBI/Ch 


SK. (ORC PARR DISTRI BUT LUN) 


Klin SPIE 

SY sUNL ip dJEDTN SUNT ORIsSCOET 
HSY 222? GRUZD Le 22? URIS CUST 
SYIVARS .UoUszuUl NV eyS cus CH ET 


SC. CHAGTAPE DISLTETBRUTIGA) 


Rts SPLP 

SY SUN) UBUEMTNE (128,128) SUNT .UBUs TH 
BSS? 2 e UbI=Mine (123,128) 372? 2?.ibo/Cu 
BSYPV2NS.GbUSM INE [1 26,128) 2V29S.0b0/CU 


6, BUILD THe LIBRARY AS FULLGWS3 
Ctr UsbeRRKLINKD PRAT TS TYPED By THE USbkR: ALL LINES ARE 
TERMINATED wilh A CARRLAGE KETURA). 


RUN SULBR 


FRURLIRCS0>SUNT,ULSCUM,FUREN, V2ZNS&,2?2??/G 
ENtRY POINIS: 

SKERRS 

SEKKTE 


TiPh A <Ck> FUR THe THIRD LIkk, LT “uST BE BLANK, ) 


SFIO2 Lub lwS 
SENDZ [Lb ins 
SEND lib ans 
SChu2 ILL ins 
St hit2 ILL Ins 
SF lilé ILL IwS 


47 (TYPE CUNTRUL Z HERE) 


7. Thk FILES G'SCumsubd, FUPFM.OBJ Anl Awy FILES BROUGHT In BY 
STeP OS HAY BE DRLELEUO AL lik USERS LISCRETIUN, 


FORTRAN IV/RSTS-E, V1C Seq 14.1.7* 
FORTRAN PATCHES 3 of 3 
OTS 


THt 


324 


325 
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I-FORMAT CONVERSION ERROR 


Tr A SPGALLVE VALUE 


Aw db FURKMAT SPECIE 


IER, Awlt 1H 


Wr Hr RESULT JS RGUAL tu THE 
SUT ASTERISK FILLEU? LHE WUsnE 


MINUS SIGH, 


THE FubtliewibeG PATC 


HOCuURKECTS 


HHES Ls PATCH #o The Tih kSTS/ 


UHr UStR SHULL KF 


lw HIS UTS? THERE. 


1, LUG Perl) THE SYSTRe 


ACCuunt, 


256 CuPY THE bribe. 
SPURRED le ulS 


tP PTRACK AS 
1S CURRESTE 


GloaCUa. und 
tATCH #4 FA 


BwG. KUR SPTE 
FOYSUTSCOM.OBRJEXASUISCOsM.UKI/CH CAX 15 Tt 


3. TN THe FULLOWI 
PeRM WATER RY 


RUN SPAITCHU 


FUPEN 


wG Tar USE 
A CARRIAGE 


RWwdRR Larut  FliokFUTSCOM. URGE 


ENTER GUTPUT FL bRFtGTSCum. ni 


FPUINT Chav 
ei sedsaaaes 
eee 
eaURD 40d=Re7 2777 
en(eb-dbbs wuld? 


FORTRAN IV/RSTS-E, VIC 
FORTRAN PATCHES 
OTS 


BoP pr 
tIRELE 
© TS FR 


1S TRANSFERRED Filk UUTei) Usorr £ 


K UF OLGIfo lx 2 
aloln OPECLE Lev, 
bateuo ello, Hx 


ThE FRUBLEM, 


t FLIRT 
Tit wit] 
Yo RU PA 


KRUM Jt 
TCh) Tt 


Tr AX = 


TYPES 
RRTURR , 


AN LV beageCa Pla 
Cte PalCHkhs HAVE 
(CH tLnVeL Lyblca 


brOPe ACCUObET £1,224, THE SYS 


bh EACKUR ShOLA ( 
WUT ALREADY bei 


UT? Inte /Cusi 


Trt GPUrRSCUREU 


He CUA Ru ok 
He MAG | Tuite. 

Tit FIRELD Ls 
bk LEADING 


Ko oYSlk (ils). 
rene Lie StAtuuku 
TUR, 

Tet Li bkaARY 


whkadk Lio was 
ACCuunT [1,2]. 


be baACKlLP OREVICK. 
MUST te ok) 


TEXTS Llyks are 


Seq 14.1.8* 
1 of 3 


enD 410S8 26400 


weeeer we weve ere 


aR 41224207 


*RALS 


BaTER CHECKSUM: to/777 


STOP o- 


RE ALY 


KUN SPLP 


aOLSCUM, Upd/DE 


FOTSCOM UBISKESUTSCUM, Nt 


4. Al EHUS POINT TRE MUDULE CLSCUm.UbJ SHUULD be CURTED UNTO 
THE BACKUP MALIA FOR PUSSLbLE FUTURE USE. 


teGe RU SPIP 
#XXSUTSCOM,UBJSUTSCOM.URIZCO 


wHERE XX LS LHe BACKUP 


5. THE FURLRAR LIbKAKY SHUULD NOW FR RReBULLT. 


OEVICK. 


THAT PROCEDURE 1S DESCRIBED Th Tak KSTS/m SrSoTe™ GkivwERAT LUA 4ANUAL 
(DEC@1L1“QRGhASATDNI) PAGE 4°09, 4° /U AnD IS REPRODUCED Bbw. 


LN THR FOGLOwI8G, 22? REPFESEDIS THE HARDWARE AUDULE APPRUPRI ALE. 


FUR YOUR CONFIGURATION, Ieee. ETS, ris, 


CUPY THe FILE #FOPEN.U6u FROM THRE BACKUP 
accuualr Ll,2). 


[N THE LAST PATCH) JF uv ALREADY Liv 


E.G. RUN SFIP 


aSYSFURPEW SOBJSXATE UREN. OBU/CU 


(AX 1S THE BACKUP DEVICE. Lk XX = PTS 


Uk FRU, 


MEDLA (ahbhReeE TT wAS STURED 


Lute /COsT MUST BRR USED) 


Curpy THE €ILES UNI.UBJ,22?7?.CK0,V2NS.ubg FROM Toe DISTRIBU r LOS 


MEDIA Ik NUT ALREADY LX ACCUUNT LL, 2) 


MOUST Usb GF Tee FouoGewlsG kSTS FUKTRAN 


UN A FREE UNIT. 


CurPyY UF DEC|1T1L~LRESAsAtHE (RK) 
DEC *LLSLKERS&=AtUp2 (DECTAPE) 


Ad FULLU NS: 


DESITRIBUTIOAN Mebla 


DECTIASLRESASARMB7 MAGTAPE (7 TRACK) 
DeCa-Ll=LEESASASMBY MAGTAFE (9=TRACK) 


mAKE LHe UNIT READY. 


FORTRAN IV/RSTS-E, VIC 
FORTRAN PATCHES 
oTSs 


Seq 14.1.8* 
2 of 3 


326 


327 


SA. CRK LISIRIBUTIUH) 


AbUw) Tok CubPy UF dst KSTS FURTRAN UDESIKIBUTIUN “EDLA us [Nig 


UTLULTY FrROGRAS Anu Lik LABEL FURIRAN, 


RUn SUTILTY 
RRUINE URN SPURL RAN 
ahz 


RuN Sele 

ASV PUNT. OhUSUKNSOUNL ObUsCU 
ASYS P72 GbUSDKNEP Pe UPd / CU 
BSYIV2HS.,0bU=0KNEV2NS.UBI/SCU 


Die CVEC# TAPE DISTRI BUTIGW) 


Rlin SPIE 

#syiUN] ORUSDY tun) OKI COLT 
BSYS 2272 RISO oP eis /CUIT 
PSLIVZNS ed EDT at VenwS QUbU/COET 


SC. CmMAGTAPE DISTRIBUT LUN) 


kU SPLP 

PSYEUNT tirUSMING LL Zn, 12h) ssl. ubds tu 
SVs 29? ObuahTvilidgd, len) 2? 2 2.0hUsCu 
BSYIVE8S.0KISh Tut lle, PZ) rVens.UBU/CH 


6. sulLvU tbh biBRARY AS FUULES? 
CPRE URUDERLESEG TeAr 1S TYPEL BY LHe USRKS aul 
Tek lwaATel allit A CARKLAGE FEVUKAD. 


RUN SLIRE 

ee eT See ee eer 
ewtey euLNiSe 
SERKS 

ShReTH 


wewweres 


Livts Ake 


(hike A <Ch> FOR Tat TRikv Ligk. JT USL HE BLAWA,) 


ae eee rie tape 
Sri? hhh INS 


Shivd2 iib INS 
SEWDYZ lub bas 
SChued {Lb des 
St luz IbL ins 
SFIlU2 iut Lis 


tz tTYek CONTROL 2 HRRE) 


/. Tbe Files GO1SCUe.U4d, ruPRW.iind AND AWY PLURS BROUGH Le pe 


SteP SO MAY bh DPDRERO Ab TRE USERS vlSCceR Ian, 


FORTRAN IV/RSTS-E, V1C 
FORTRAN PATCHES 
OTS 


Seq 14.1.8* 
3 of 3 


THe 
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COMPUTE-BOUND PROGRAMS MAY ABORT PREMATURELY 


COSPUTEOBUUMNLD PROGRAMS KUAWING Un PLP#11/749 UK PDPPLIs su 
PRUCKSSUKS with THe relle|ns UR FPILIOC FLGUALTING Polat 
PROCESSOR UPTIONS AY JSSUE ERRUBFUUS ERRUK HESSAGES 

QR AKUKE PRIOK TU CUMPLETTUN, tHE FOLLOWING PAICH 
CURRECTS THe PRUBLE®, 


THIS LS PATCH #1 TU THE FURIRAN LV RkUN@TISE S¥othe. 
THIS PATCH SHOULU BE APPLIED REGARDLESS UF Tok PRESENCE OF 
FP1) FLOATING PUIN] HAKDWARE Uv THE SYSTEM Iw QUESTION. 


]. LUG IwTU Tih SYSTEM UNDER A PRIViLFGED ACCOUNT, 


2 IT 18 WECESSAKY ([U REMive THE FORTRAN LV RUNe TIME 
SYSTEM WHILE MAKING LTHIS PATCH, iF THiS wibu 
LEFECT UPERATLUNS, USERS SHOULD BE NUTLE LED Al 
PHiS PulWT THA? FURTRAY wILL BE UNAVALLABLE UNTILL 
THE PATCR [LS COMWPLETR. 


3. RUN SUTILLY 
? UNxLUAD FURRIS 
2? REMUVE FURRTS 
2 RALT 


4 in THE PULLOwLsG, THE USER TYPES THE UNDERSCORED 
YRXT? <CR> LDkUTES THE CARKIAGRE RETURN KEY? SLED 
VENOTES THE LIbk FEBD KEY. 


RUN SUDT 


ONT VXX"YY 


Pluk? LO, )FURRTS.RIS<LE> 


€0624/ U10065 137<LE> 


U0bb2b6/ YUU2Z54 175644<CK> 


#15044/ QUQ00U 10065K<LF> 


U19S04n/ VUVONU 254<Lk> 


FORTRAN IV/RSTS-E, V1C Seq 14.1.9* 
FORTRAN PATCHES 1 of 2 
RUN-TIME SYSTEM 


378 


329 


O15650/ VOGOVDU 127376LE> 


eer eencean 


}UOUKLED> 


wewwwre=e 


442<LE> 


10437 7<ik> 


1040 3¢<ib> 
207<CK> 


#QLDSTIN G73 YOIKCR> 


He 


Vldso0d2/ VOOGUD 


U15054/ GuUubU 


Dld5050/ GOOQO00 


Vldo60/ UUIULO 


O15602/ VUdN0OU 


5. The Kune TIME SYSfe4 MUST 
FULLUWLiNG COMMANDS? 


KUN SUTILTY 

2 ADU FURKIS/EFIL 
? LOAD FURKTS 

gf EXLT 


Oe LC LS ADVISABLE TU CuUFY 
DeEVICt AL THIS JEME.  XK3 


KUN SHIP 


in 


ib AE LES ALLEY 


PRE PAYCHED RTS Tu 
REPRESENTS THE 


BRAXSPURRTS.RKTS/CUSEO, TI RURRTS.RIS 


tz 


FORTRAN IV/RSTS-E, V1C 
FORTRAN PATCHES 
RUN-TIME SYSTEM 


wJ Th 


THE 


HACKUP 


BACKUP 


DrviCe. 


Seq 14.1.9* 
2 of 2 
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J=J-J GIVES INCORRECT RESULTS 


1. STATEMENTS UF TH FORM 
JeJdeJd 
ARE LwCURRECILY UPTIN1L Ze) 10 Cole EQUIVALENT fu 
Jer2¥J 
2. IMPROPER COLE GENRRATLUS FOR CERTAIN SUSTRACT 4N0 DIVIDE 
OPERATIONS Lk THE SE TGHBGRHODD OF A CORVERSION UPERATIOUN 
wHUSE KESULT 1S A CUMMON SURSERXPRESSION, 
3. INTERACTIORS BETWEEN SPATEMENTS whICH GENERATE TEMPORARY 
VARIABLES OD EKRURS IN THESE STATEMENTS mAY CAUSE THR CUusPILER 
Tu LOOP. 
4, UPDATING VARIABLES Li OIFFERENT COMMUN BLUCKS ALTH THR SAME 
UFFSET YIELUS INCORKECD RESULTS, 
THE FOLLOwING PAICH CORRECTS THESE PRUULEMS, 
THIS IS PATCH &2 1U THE RSTS/b FURTRAN Tv COMPILER. 


1. LUG INTO THE SYSTEM UNDER ACCOUNT 11,2), THE SYSTEM LIBRARY 
ACCUUNT, 


1A, VERIEY THAT THE CURRENT VEKSIU® OF THE COMPILER 1S VOICFOU3A, THis 
MAY Br DURE AS FULGUUWS! 


KUN SFURTRAL 
*¥,TT3=1T: 
tz (TYPE CTRL Z@ HERE) 


FORTRAN LV VOICSU3A SAT 27-MAR=76 19215356 PAGE vUL 


le (HE CURRENT VERSION LS NOT VO1IC*034, THEN THE PREVIOUS PATCH 
MAY HAVE BERH Oe LTTED. 
2. ENTER THE FULLUalSG FILES 


FILE NAMES TRKST.FOR 


FORTRAN IV/RSTS-E, V1C 
FORTRAN PATCHES 
COMPILER 


Seq 14.1.10* 
1 of 7 


330 


331 


COMMON SAILS I1 
COMMON /A2Z/ 1z 
Ti=12+} 


9) A=1LFIX(C1OGUFFA) 


JsdeJ 
s=1/ (Ati) 
fw 


3. CREATE A CUPY 


RUN SéIP 


UF THe CUMPILER. 


THIS 1S THE COPY TU Be PATCHED. 


BULDFUR.SAVEFURIRA,SAV/CU 


FULDE GR. SAV<K104>/RE 


atz 


4. IN THE FOLLOGwING 
THE CARRIAGE KETURN KEYS <i> 
KESULTING VERSIUW 


[Ht USER 


TYPES Tritt 
DRE MUTRS 


UF FURTKAN ® LLL sk FuRLRAN 


NOTE: Column 2 to be typed only after Column 1. 


ROM PATCH 


uenweewaw 


PATCH VOG1-u2 


Flue NAME== 
FULOFUR/UCCRD 


221031K 

#2260; 2k 

#2344738 

#304074 

#1053, 540/ 2uzz7 
1024,467 12 
*#tusi,14/ 0 
1orls167_ ; 
1031,20/ 0 
luii,22/ iv) 
1031,24/ U 
19:1,2b6/ 0 
103s1,30/ 0 
*1133,1020/ 402 


FORTRAN IV/RSTS-E, V1C 
FORTRAN PATCHES 
COMPILER 


4/37<LE> 
2224<CR> 


2022765 > 


Wet ey 
7UNLIE 


JUO3<LED> 


20227<6LE> 


12<Lb> 


207<LE> 


104403<CR> 


4737<LE> 


weerwwreewe 


11:49,320/ 
Lis4,322/ 
*1121,07 
11t1,2/ 
1i:1,4/ ¥ 
1L31,6/ U0 
11:31,10/ 
1isi,12/ 
1131,14/ 
1131,10/ 
iisi,2u/ 
lisi,22/ 
11is1,24/ 
1i3),.26/ 
*1422,540/ 


14:3,456/ 


#1422,15760/ 


UNDEKSCURED 
THE Link FEED KEY, CHE 
Lv Vo1C+038, 


TEXT# <CR> LESUTES 


§72u 2210<LED 
S020 402eCK> 

0 40761 
maitiewe 
2012¢LE > 

So4a1eLe> 

i eects 

6 SuaI<LF> 

0 5041 <LED 

0 S741<LF> 

é 201 37<uE> 
v Z1SZ<LE> 
0 101 30B<LE> 
0 207KCK> 


1o7uG 4737<UF> 


177130 2210<CR> 


4zlué 4137<6L8> 


Seq 14.1.10* 
2 of 7 


NOTE: 


1434,1u012/ 
*1431,0/7 
14rt,2/ 0 
14:1,4/ o 
14:31,67 @ 
$431,107 
14:1,12/ 
1421,14/ 
i4:1,16/ 
14:21,20/ 
14:1,22/ 
1431,24/ 
14:1,26/ 
143:1,30/ 
14:1,32/ 
1431,34/ 
1431,36/ 
1431,40/ 
14:1,42/ 
14:1,44/ 
¥#1034,1032/ 
Lora, 16347, 
#16:1,0/ 
1or1,2/ u 
1o:1,4/ 0 
1631,6/7 U 


for1,10/ 


Lo:1,12/ 


Column 4 to be typed only after 


Column 3 
177ovu 2234<CR> 
0 13700<L#> 
Te 
11901 <1.F> 
427U1eL> 
‘a oF aaa eeyetes 
0 1200276 UF > 
0 125<LE> 
0 103401<LE> 
0 SO20<LF> 
0 207eLE> 
0 42702¢Lt> 
0 177600<LF> 
0 20227¢LE> 
0 1O3<LE> 
0 1003<LE> 
v 22121<LF> 
0 162716<LE> 
0 1e<Lh> 
0 207<CR> 
12721 -4737¢LF> 
35405 -2210<CR> 
u 12/00<LE> 
seatiue 
57206 LF > 


1OGQ15<LF> 


0 22037<LE> 


Q 2964<LE> 


FORTRAN IV/RSTS-E, V1C 


FORTRAN PATCHES 


COMPILER 


Column 3. 


Column 4 
lozs1,14/ U 
fo:1,16/ 0 
lasl,2u/ i) 
loz1,22/ (a) 
lo:1,24/ 0) 
loil,26/ G 
1o31,3U/ 0 
16o:1,32/ Q 
163:1,34/ 0 
lo31,36/ 0 
1621,40/ 0 
1o:1,42/ 0 
lo:1,44/ U 
1o:31,406/ 0 
*3324;75R 
#3300708 
#2015, 660/ giui4 
2016,020/_ 1010 
20:360,6022/ 14000 
*2136,604/ 21014 
2116,506/ Lu10 
2180,010/ 140G0 
€22:5,9604/ 21614 
2240,524/, Lui 
Z226,926/ 4400U 
e132,2506\N 101 
a 
READY 

Seq 14. 
3 of 7 


1012<LF> 


220375 > 


Z5o060<LE> 


1007<LEF> 


SULU<LE> 


b2i3si<ik> 


177770<LF> 


2044<Lb> 


5720<LE> 


137<LE> 


S710<LE> 


aweasrwnae 


12721<LE> 


35405<LE> 


207<CR> 


1011<LF> 


21014<LF> 


404<CR> 


1O1I<LE> 


210146 > 


40 4<Ck> 


10) 1<LE> 


21014<LE> 


404<CR> 


102<CK> 


1.10* 


332 


333 


5. TEST THR PATCH BY CUMPLLING TRKE TEST PRUGRAM (TEST,FUR) AnD 
UBTAIwLNG The GrwkRATED CODE LISTING BUTH WItH AND wItHuut 
THE DEBUG OFTIG® (COMPILER 40 OPTION). PRINT THE LISTINGS 
WHEN THeY ARE CUMPLETE, 


beG. RUA EXEC 
*ULDFOR 
#, TESTDSTEST/LSALL/U 
[.MALlive) ERRUKS! 1, wARNINGS$ 0 
*, TEST=IEST/LIALL 
4tz (CURL/Z LS TYPED HERE) 


REALY 


oO. Tr dik COMPILER ABORTS, LOUPS, GK THE GiRRATED CODE LS nul THe 
SAME AS IN THE LISTING BELOW, KEAPPLY YHE PAICH STARTING Af 
SIEP 3 (ABUVE). 


7. OUNCE TRE COMPILER HAS BREN SUCCESSFULLY PATCHED, REPLACE Tne 
ORIGINAL WITh The PATCH.L VERSIUN AS UUPLINED BELOAS 


tise RS SHOULD PERFRAIN FRUM INVOKING FURTKAN PUK THRE QUKATLUN UF 
THIS STtPs Tht MESSAGE 


CAN'T Fand FILe GOR ACCOUNT Al Link 410 


WILL BE GEWEKATED IF FURTR&,SAV LS NUL PRESENT whew 
EITHER KUN SFORTRAN OF THE FOR CCL LS Usen Tu INVOKE FORTRAN. 


AT THIS POQIBT THE wkw (PATCHED) CUMPILERK SHUULD ot MADE [TU REPLACE 
THE UNWPATCHED VERSION, 


teGe 


RUN SPIP 
BFORTRA.SAV/DE. 
REORLRKA.SAV/KESULOFUR.SAV 
atz 


Be. Ow THAT THE PATCH IS INSTALLED, THe PATCHED VERSIUNW Gk FURTRAN 
SHOULD BE CUPTED UNTO Sumr DACKUP MEDIA FUR POSSIBLE FUTURE 
PATCHES. 

b.G. 


TRASSAVEFURTRA.SAV/TU AK iS Trt wACnhURF ViviCe, 


LISTINGS 


FILES TEST.LST 


FORTRAN IV/RSTS-E, VIC Seq 14.1.10* 
FORTRAN PATCHES 4 of 7 
COMPILER 


FORTRAN IV VO1C+u3b 
Qoul CUMMON /AL/ T1 
00U02 CUMMON /AZ/ L2 
0003 l1l=1l2+1 

D A=1FIX(10U00F¥FA) 
vuG4 JoJeJd 
0065 H=l/(A4]) 
0006 tivD 


MON 29°MAF=76 21:92:27 


FURTRAN LV 


STUKAGE “AP 


wAME GFESET ATTRIBUTES 

J 0V0006 INTREGER*2 VARIABLE. 

& OUUU10 RKEAL*FS VARIABLE 

A 900014 REAL*4 VARTABLE. 
CUMMON bLUCK /AIL/ LENGTH 000002 
It 0OUVOOO INTEGER¥2 VARIABLE 
CUMMUN BLUCK /A2/ LENGTH 000002 
12 QOQ0QUO0 INIEGEK*2 VARIABLE 
FORTRAN IV GENERATED CODE 

1S #0003 


g00020 LSWNS 
000024 MULSNM 
QUVU32 ICISM 


ISs #0004 
0000360 LSNS 
000040 MUISOM 


#000003 
A2+es0gguuN A1+#00G0000 
Al+2GGG000 


000G06 


ISN #0005 

Vv0044 LSNS 

vovd046 MULSTIS #000001 
000052 CIS 

000054 MULSIS #000001 
Ouguou CIS 

000062 ALFSmS 000014 
0V0066 DIFSSS 

QUU070 MOFSSM 000010 


1SN #0006 
O0UU74 LSNS 
Q00076 RETS 


Fluk: TESTD.LST 


FORTRAN IV/RSTS-E, V1C 
FORTRAN PATCHES 
COMPILER 


Seq 14.1.10* 
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334 


FORTRAN IV VU1CHU 3b MOn 29=MAR@=76 21202232 


0u01 CummMun /AIY/ 11 
OuVve Cummun /A2/ 12 
QU03 ll=iz+1 

udo4d D A=1E1X(100U*¥FA) 
yous JzJeu 

0006 b=1/(A+t1) 

0007 END 

FURTRAN IV DLAGHUSTICS 


In LINE 0004 “SG #0490 TLLEGAL TYPE FOR GPEKALOR 


FORTRAN Lv SiGRAGE MAP 

NAME OFFSET ALrTRIbULES 

A UUO0006 KEALAG VARTASLE 
LFIX guQu0V CTNTEGERA2 PROCRUDURE 

<d Q0001LZ INTEGRR*2 VARLABLE 

b vg0014 REAL¥*4 VARTARLE 
CUMMON BLUCK SAILS LENGTH VO00002 
{1 O90000 INTEGEFRF2 VARLABLE 
COMMUN KLUCKR /AZ/ bLenGPRH YVOOUV? 
L2 VOO00U ITNTEGERF2 VARIABLE 
FORTRAN LV GENER RATED CUDE 

isn #u003 

QO0022 LONS RQQ0GG3 

OOLU2Z6 wULSMM A2+8UUGUUU Al+euguguyd 


000034 i1Cis™ Al+#000UGN 


ISk #0004 


JuUuuGU LSS 
000042 FuDvSs 


Sw #UU05 
V0U044 JSNS 
O00UNd6 MUISUM QUOU12 
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ISv #0UQ6 


QOV052 LSS 
0v0054 MOISIS 
000060 CFIS 
OQuvub2 HWOISIS 
QVVObS CFIS 
Q00Uu7U ADE SMS 
VOv074 ODIFSSS 
UQVUTO MUFSSH 
1SN #UQ0O7 
Vvou1eE2 LSws 
000104 RETS 


#VUGUu0) 


guguQuul 


000006 


000014 


FORTRAN IV/RSTS-E, VIC 


FORTRAN PATCHES 


COMPILER 
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TRAP TO 4 CORRUPTS PROTECTION CODE (GH) 


CERTAIN CLASSES OF TRAP Yo 4'S AND TRAP To 18'S 
May CORRUPT THE MEFAULT CASSIGNED) PROTECTION CODE, 
THE FOLLOWING PATCH CORRECTS THE PROBLEM, 


THIS $8 PATCH #2 TO YHE FORTRAN TV RUNwTIME SYSTEM, 
1. LOG INTO THE SYSTEM UNDER A PRIVILEGED accQuUNT, 


Ze rT 18 NECESSARY TO REMOVE THE FORTRAN TV RUN@TIME 
SYSTEM WHILE MAKING THIS PATCH, IF THIS WILL 
FFFECT OPERATIONS, USERS SHOULD BE NOTIFIED at 
THIS POINY THAT FORTRAN WILL BE UNAVAILABLE UNTIL 
THE PATCH TS COMPLETE, 


3, RUN SUTILTY 
? UNLOAD FORRTS 
7? REMOVE FORRTS 
? EXxrt 


4e VERTEY THAT THE CURRENT PAYCH LEVEL OF THE RUNe TIME 
SYSTEM IS PATCH LEVEL A, THIS MAY RE DONE AS FOLLOWS? 


IN THE FOLLOWING, THE USER TYPES THE UNDERSCORED 
TEXT: <CR> DENOTES THE CARRIAGE RETURN KEY? <LF> 
DENOTES THE LINE FEED KEY, 


RUN sopT 
ODT Vxxevy 
FILE? (8,1) FORRTS,RTS 


Seweee te tatrtts 


e42 


IF Toe PATCH LEVEL IS NOT AT LEVEL A (101) THEN THE PREVIOUS PATCH 
HAS BEEN OMITTED AND SHOULD BE APPLTED BEFORE PROCEFDING ANY FURTHER 


RSTS/E FORTRAN IV V1c Seq 14.1.11* 
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RUN $onT 


OOT Vxxevy 
FILE? (O, 11 FORRTS,RTS<LF> 


ec veeceteteseusasves 
C12360/ Sarin = 4737 EL Fe 
F28e00 eeteuqun 
12362/ {144 175664<CR> 
eseeenveegn 
#156647 ApABRe = B1O3eLF> 
15666/ aagana 32702eLF> 
. eS @eeenren 
18670, agnaae 1<LF> 
eense 
15672, neeaed 1084eLFe 
eetgeune8 
15674, agnaad ye2ioelFn 
aetna aesea 
15676/ @nnaRo ja@aeLF> 
15760, aaaaas B27tseL Fs 
. ee*e2veaeeen 
15782/ o@9e080 6<LF» 
15784/ aasaca G2716<LFe 
ee2neneen 
15706/ @aeene 2aLF> 
aese@ve 
15710/ aaeaad Ko03<LF> 
@eetveqdes 
15712/ agaead 207«CR> 
e@e0euue 
#QISSIWN (41 102eCR> 
er2rtvee Pn@anvte 
on2 


5, THE RUNCTIME SYSTEM MUST NOW BE REINSTALLED WITH THE 


FOLLOWING COMMANDS?) 


RUN SUTILTY 

7? ADD FORRTS/EMT 
? LOAD FORRTS 

7 Exrt 


6, TT 18 ADVISABLE TO COPY THE PATCHED RTS TO 4 BACKUP 


DEVICE AY THYS TIME, 


RUN SPIP 


OXY PFORRTS,RTS/COs(S, 13 FORRTS,RTS 


Wat 


RSTS/E FORTRAN IV V1C 
FORTRAN PATCHES 
COMPILER 


XXs REPRESENTS THE BACKUP DEVICE, 
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MISSING LEFT QUOTE IN CALL STATEMENT CAUSES COMPILER TO TRAP (GH) 


1, PROGRAM UNITS WITH LARGE AMOUNTS OF ARRAY SPACE AND ARITHMETIC 
STATEMENY FUNCTIONS (ASF'S) MAY CAUSE THE COMPILER TO TRAP, 


2. Call STATEMENTS WHICH CONTAIN A MISSING LEFT QUOTE MAY CAUSE THE 
THE COMPTLER TO TRAP, 


3, octal CONSTANTS NOT FOLLOWED BY AN OPERATOR MAY CAUSE THE COMPILER 
To acy UNPREOICTABLE, 


SOLUTION: THE FOLLOWING PATCH CORRECTS THESE PROBLEMS, 


PROCEDURES 


1, 
1A, 


26 


Je 


LOG ONTO THE SYSTEM UNDER ACCOUNT (1,23, THE SYSTEM LIBRARY ACCOUNT, 


VERIFY THAT THE CURRENT VERSTON OF THE COMPILER TS V@1C#O38, 
THYS MAY BE HONE aS FOLLOWSS 


RUN SFORTRAN 
o,TTrstTs 
42 CTYPE CTRL Z HERE) 


FORTRAN IV vV@iCeg3B 


TF THE CURRENT VERSION I8 NOT V@{C°A38, THEN PREVIOUS PATCHES MAY 
HAVE BEEN OMTTTER AND SHOULD BE APPLIED BEFORE PROCEEDING ANY FURTHER 


CREATE THE FOLLOWING FILES 
FILE NaMet TEST,FOR 


CatL SUBCA,Bt) 
CALL ASSYGNC1,"TTe") 
Ens 


Creare a COPY OF THE COMPILER, THIS IS THE COPY TO RE PATCHED, 


RUN SPIP 

#OLOFOR, SAVEFORTRA,SAV/CD 

HOLDEOR, SAVE{O4>/RE 

WA? (TYPE CTRL Z HERE,) 


RSTS/E FORTRAN IV VLC Seq 14.1.12* 
FORTRAN PATCHES lof 4 
COMPILER V01C-03B 


4, IN THE FOLLOWING THE USER TYPES THE UNDERSCORED TEXT; eCR> DENOTES 


THE CARRIAGE RETURN KEY) 


<LF> DENOTES THE LINE FEED KEY, THE 


RESULTING VERSION OF FORTRAN WILL BE FORTRAN TV VA1C@O3C, 


NOTE: 


RUN SPATCH 


PATCH V@18A2 


FILE NaMFee 
*OLOFOR/O<CR> 


22107 R 


*226059R 


0012, 2070/ 
612,26727, 
*691,07 0 
6il,27 A 
6ti,4/ Oo 
6t1,6/ a 
6t1,10/ o 
6tl,12/ a 
681,147 a 
712,167 4/ 
712, 16767. 
0712,4049/ 
712,4044/, 
711,07 0 
711,2/, 2 
711,4/ 9 
711,6/ a 
781,107 o 


7ti,1a/ a 


120027 4737<LF> 
54 2219«CR» 
120027<LF> 
47<LF> 

10081 < LF> 
eereasens 
104402<LF> 

ae eee Feu 
120007«<LF> 
seeSnv ee Seen 
B4<LF> 

a2eFe0G@ 

207<CR> 

aPPRouoe 

5480 4737 Fo 
5685 2210«CR> 
137<LF> 
2222<CR> 
JOB3<LF> 
weSeuneq 
S400<LF> 

ee teuares 
S6O5<LF> 

Qa7<lF> 

we Feuvae 
{94412<LF> 
estaeaeeen 

12601 <LF> 


12601 
12602 


RSTS/E FORTRAN Iv Vic 


FORTRAN PATCHES 
COMPILER 


Column 2 to be typed only after Column 1. 


Column 2 

7tl,ias @ 12602<LF> 
TEL ,16/ a 1OS6aeLF> 
711,207 a eaces 
7el,2a/ a iaoxces 
Tit, 24/ 0 aszecce> 
e145i,%2/ 120027 120127«CR> 
o1412,9531\ 122 Bats 
01712,7207, 10563. a7 37<L FD 
Sseesooes snsedces 
1782,7292/ 4 2210«LF> 
1712,724/ 5725 2atecR> 
#1731,0/ Qa 10563<LF> 
\Wileas @ a<LF> aie 
17%1,4/ @ b2705<LF> 

1711,67 0 es 
{712,107 a 2a7<CR» 
#5612738 — 

eC TFs ee 

e2U53,1754/_ 14004 4737 F> 
2183,17887 «22424 Bat eCR 
walet,as a 1aa0e<LF> 
atlas @ s2704eLF> 
2iti,4s a or 

21ti,6/ a 307 <cR> 

#182, 2806\ 102 LB3<CR> 


+E 


READY 
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6. 


7. 


TEST THE PATCH BY COMPILING THE FORTRAN TEST PROGRAM, DIRECTING THE 
LISTING TO A FILE AS FOLLOWS? 


RUN SEXEC 

*OLOFaR 

*, TESTSTEST 

[,MATN,| ERRORS: 2, WARNINGS! @ 
47 CTYPE CTRL Z HERE) 


IF THE COMPILER ABORTS, LOOPS, OR THE GENERATEN LISTING IS NOT THE 
SAME 4S THE ONE BELOW, REAPPLY THE PATCH STARTING AT STEP 3 (ABOVE), 


ONCE THE COMPILER HAS BEEN SUCCESSFULLY PATCHEN, REPLACE THE 
ORTGINAL WITH THE PATCHED VERSION AS OUTLINED BELOWS 


USERS SHNULD REFRAIN FROM [INVOKING FORTRAN FOR THE DURATION OF 
THTS STEP) THE MESSAGE 


CAN'T FIND FILE OR ACCOUNT AT LINE 410 


WILL BF GENERATED TF FORTRA,SAV TS NOT PRESENT WHEN FITHER 
RUN SFORTRAN OR THE FOR CCL IS USED TO INVOKE FORTRAN, 


AT THrS POTNT THE NEW (PATCHED) COMPILER SHOULD BE MADE TO REPLACE 
THE UNPATCHED VERSION, 


E.G. RUN ¢PIP 
#FORTRA,SAV/DE 
#FORTRA,SAV/RESOLDFOR, SAV 
#42 (TYPE CTRL Z HERE). 


NOW THAT THE PATCH ITS INSTALLED, THE PATCHED VERSION OF FORTRAN 
SHOULD BE COPIED ONTO SOME RACKUP MEDIUM FOR POSSTRLFE FUTURE 
PATCHES, 


Ev6 RUN SPITP 
EXXPFORTPA SAVEFORTRA,SAV/C0 XX IS THE BACKUP DEVICE, 
#AC 


LISTINGS 


FILE NAME, TEST,LST 


FORTRAN TV VaL1Cea3C 

@881 CALL SUB(A,B') 

aoa2 CALL ASSTGN(1,"TT3") 
aaa3 FN 


RSTS/E FORTRAN IV VIC 
FORTRAN PATCHES 
COMPILER 
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FORTRAN fv DIAGNOSTICS 

IN LINE magi MSG #0464 SYNTAX ERROR 

IN LINE aaa2e MSG #058 INVALIO OCTAL CONSTANT 
FORTRAN TV STORAGE MAP 

NAME OFFSET ATTRIBUTES 


ASSIGN aneaa6 REALea VARTABLE 
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END OF FILE NOT RECOGNIZED FROM KEYBOARD (SPR 11-9224 GH) 


FORTRAN does not recognize control Z as end of file from the keyboard. 


When the FORTRAN runtime system receives a control Z in response to a 
-TTYIN EMT, it exits the runtime system. When a control Z is received 
in response to a .READ EMT, an end of file is passes back to the pro- 
gram. The FORTRAN object time system does .TTYIN EMT requests for 

all teletype input. Hence, a control Z in response to a FORTRAN 
program expecting input from the terminal will terminate the program 
and exit the RTS. 


RSTS/E FORTRAN IV VO1C Seq 14.1.13 
1 of 1 
RUNTIME SYSTEM 
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CALL OR FUNCTION ARGUMENTS MAY CAUSE THE COMPILER TO TRAP (GH) 


CALL UR FUNC1I10% ARGUMENTS OF THE FORM LEFT-PARENTHESIS, 
CUNSTANL (OR VAKIABLE), KIGHT PARENTHESIS may CAUSE Litt 
CUMPILER TU TRAP, 


bE.G. CALL thSTO2,(01)) 


THE FULLOWING PATCH CURKECTS THIS PRKUBLE, 
1. LOG GNTU THE SYSTEM UNDER ACCOUNT [1,2], THE S¥STEM LIBKARY ACCUUNT, 


TA, VEKLIFY THAT THE CURRENT VERSION OF THRE CUMPLLER 1S VuIC=03C. 
THIS MAY BR LUNE AS FOLLUWS: 


KUN SFURTKAN 
*, TTS STT: 
“Z (Tybi CTKL Z HERE) 


FURTRAN IV VO01C#03C 


Tk THE CURRENT VERSION LS NUT VUIC*03C, THEN PREVLUUS PATCHES MAY 
HAVE BERS UMITTED AND SHUULD tbh APPLIED BEFURE PRUCEEDING ANY FUTHER. 


2. CKRAiB A COPY UF THr COMPILER. THIS IS VHE CUPY TD BE PATCHED, 


KUN SPIP 

HWE WEOUR.SAVEFORTKA,SAV/CU 
#NEWFOR.SAV<K1U04>/RE 

a*Z CLYPE CTRL Z HERE) 


3. TN THR FULLUWING THE USek TYPES THE UNUVERSCORED TEXT: <CR> DENULES 
PHE CARRIAGE REFURN KEY? <LE> DENUTES THE LINE FRRD KEY. THE 
RESULTING VERSION UF FURTKAN WILL KR FURTKAN LV VO1C-03D, 


ok PATCH 


PATCH VOL"02 
FILE WAMEw= 
FNAB WEUR/UCCK> 


wen wee awww e s 


¥Z20071K 


RSTS/E FORTRAN IV vic Seq 14,1.14* 
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#23447 2R 


*1132,1750/ 5203 26/27<LF> 
Lit2,1760/ 267271 Te032<LE> 
11:2,1762/ 176030 2ecLE> 
113:2,1704/ 26 11a <Les 
1182, 1700/ 1310 $203«CR> 
*#121,2500\N 103 104<cR> 


+E 


a UNCE ‘THE CUMPALEK HAS BEEN SUCCESSFULLY PATCHED, 


REPLACE THE 


RSTS/E FORTRAN IV V1C 
COMPILER V01C-03C 2 of 2 


ORIGINAL wilTh THE PATCHED VERSION AS UUTLINED debOw: 


USERS SHOULD REFRAIN FROM LNVOKING FORTRAN FOR THE DURATIUN UF 
THIS SikP; THE MESSAGE 


CANNOT FIND FILE OR ACCOUNT AT LINE 410 


wibLbhL Be GENEKATED IF FORTRAZSAV 1S NUT PRESENT WHEN @ YU PHER 
RUN SFURTRAN OR THE FOR CCL IS USED TO INVOKE FORTRAN 
‘ 


AT THIS POLNT THE New (PATCHED) COMPILER ShUULD Bk MADE TO REPLACE 
THe UNPATCHED VERKSIUN, 


beGe RUN SPIP 
#FORITKA.LSAV/DE 
RRORTKA.SAV/RESNEWEOP.SAV 
A°Z% (TYPE CTRL @ HERE) 


NQwW THAT THE PATCH 1S INSTALLED, THE PATCHED VERSION OF FORTRAN 
SHUULD BE CUPIED OR 10 SUMB BACKUP MEDLUM Fuk PUSSISLE FUTURE 
PATCHES. 


E.G. RUN SPIP 
PXXSFOURTRA.SAVSFURTRA.ZSAV/CU XX 1S THE SACKUP DEVICE. 
#° 7. (TYPE CTRL 2 HERE) 


Seq 14.1,14* 
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CLARIFICATION: COMPARING ASCII DATA ITEMS (SPR 11-8572 RB) 


When more than one character is stored in an individual FORTRAN 
variable (as is done with A-FORMAT conversion), comparison between 
variables may not yield the expected ASCII collating sequence. For 
example, in the following FORTRAN code, the variable LESS is set to 
- TRUE. : 


LOGICAL LESS 
DATA A/'SF'/, B/'DP'/, LESS/.FALSE./ 
IF (A.LT.B) LESS = .TRUE. 


The FORTRAN language does not specify the number of character data 
which may be stored in a data item; it merely guarantees that one 
character (minimum) can be accommodated in each variable. The PDP- 
ll format for ASCII data stores succeeding characters at ascending 
byte addresses; however, integer and floating-point comparison 
operations compare word, not byte, data, hence the items are com- 
pared byte-reversed from the ASCII sense. To correctly compare 
ASCII data in the PDP-11]1 environment, the LOGICAL*1 datatype should 
be used (which will cause byte comparisons to take place), or the 


program should be restricted, as per the FORTRAN standard, to storing 


only one ASCII character per variable or array element; e.g., Al 
FORMAT. 


RSTS/E FORTRAN IV Seq 14.2.1 
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REASSIGNING SCRATCH FILE (SPP 11-8184 BR) 


PROBLEM: SORT-11 (RSTS/E) does not allow the scratch file to be 
assigned to a device other than SY: (system device). 


DISPOSITION: The scratch files used by SORT-11 use LUN (Logical 

Unit Numbers) 6,8,9,19,11,12,13,14. In file SRTRST.CMD, these LUNs 
are mapped into SY:. These scratch files may be assigned to a device 
different than SY: when SORT-11 is being built. This is accomplished 
by appropriately modifying file SPTRST.CMD. For example, to assign 
LUN #6 to DK1 and LUNs 8, 2, 18 to DK2, do the following: 


Replace ASG=SY:3:4:5:6 
ASG=SY:8:9:19 
with 
ASG=SY:3:4:5 
ASG=DK1:6 
ASG=DK2:8:9:19 
SORT-11 V1.0, V2.0 for RSTS/E V06A-02 Seq 2 


] of 1 
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DOCUMENTATION UPDATE (SPR 11-8257 FI) 


PROBLEM: The SORT-11 Reference Manual does not correctly describe 
the output files of SORTA or SOPTI sort processes when SORT-11 is 
running on RSTS/E. 


DISPOSITION: See documentation update on the following page. 


SORT-11 V1 for RSTS/E VO06A-02 Seq 4 
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DOCUMENTATION 


UPDATE 


SORT-11 Reference Manual DEC-11-USTMA-R-D 


1.3.6 RSTS/E SORT-11 Record Formats 


The format of records written by SORT-11 on RSTS/E is somewhat 

different than that produced by SORT-11 on RSX and IAS. While the 
actual data remains the same, SOPT-11 on RSTS/E may write what are 
known as DOS formatted binary records (Format 3) if binary data is 


There are three possible record formats in RSTS/E COBCL storage files: 


Format 1: 


Format 2: 


Format 3: 


This is the standard Formatted ASCII record, consisting 
of data bytes, beginning on an odd or even address, 
followed by a carriage return (octal 915) hyte, followed 
by a line feed (octal 012) byte. 


Format 2 records are similar to Format 1 records, 
except that three null (octal 000) bytes are prefixed 
to the record. 


Format 3 records are DCS Formatted Binary records. The 
first byte is an octal 001, the second byte is null 
(000), the third byte is the low-order byte of the byte 
count, and the fourth byte is the high-order byte of 
the byte count. The data bytes follow. The last byte 
is a checksum byte, calculated on output and verified 
on input. The byte count is the number (in binary) of 
data bytes plus 4 (the number of header bytes). It 
does not include the checksum. The checksum is 
calculated so that the (8-bit) sum of all bytes, 
including header and checksum, is zero. 


For variable-length record files, RTSLIB (FCS emulator) will scan the 


data bytes. 


If no bytes fall in the ranges of octal 000 to octal 037, 


inclusive, or octal 200 to octal 377, inclusive, a Format 1 record 
will be written; otherwise, a Format 3 record will be written. 


For fixed length record files, a similar scan is employed, except that 
Format 2 records will be written for data with all bytes in the range 
of octal 040 to octal 177, inclusive. Otherwise, a Format 3 record 
will be written. 


SORT-11 Vl for RSTS/E VO6A-02 Seq 4 
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RUNNING RPGESP VIA CCL COMMAND 


PROBLEM: When RPGESP is executed via a CCL command which includes the input file 
specification, RPGESP then still asks for the filename -- for example, 


ESP PAYROL.RPG 


RPGESP V01-13 
FILENAME? 


DISPOSITION: The following patch corrects this problem. Obtain RPGESP.BAS from 
the RPG distribution; edit these lines in the source; compile, and replace the file 


RPGESP.BAC under [1,2] -- protection code must be <232>. 
liil! RPGESP VERSION 1 EDIT 14 26-MAY-76 
2600 PRINT "RPGESP V@1-14": 

ON ERROR GO TO 8609: KS=SYS (G6S+CHRS (-7%)) : 


Z4$="ESP"+NUMS ((PZEK (518%) AND 255%) /2%)+". TMP"; 
OPEN Z4S AS PILE 53% 


38008 KS=CVTS$ (SYS (CHRS (7%) ) ,168): KS=INSTR(18,KS," "): 
ZIS=RIGHT (KS,K%) IF K%>O8: Q6%= (K$>9%): GO TO 1389 
RPG II v7.04 
1* 
RPGESP V01-13 oe 1 
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RUNNING RPGXEQ VIA CCL COMMAND 


The RPGXEQ utility distributed with RPG V7.04 assumes its CCL-entry name will be 


two letters. For example, suppose you set the RSTS CCL table to define "XEQ" as 
the CCL for RPGXEQ. The keyboard command "XEQ ACCT2" would run RPGXEQ, but RPGXEQ 
would then discard "XE" and try to run QACCT2.TSK. 


Properly, the CCL entry-point should take any string up to the first blank or 


tab as the CCL-entry name, and discard that portion to get the taskname. To make 
this so for RPGXEQ, obtain RPGXEQ.BAS from the distribution and edit these lines: 


Pees RPGXEQ VERSION 1 EDIT 2 14-JUN-76 


30010 CS=CVTS$ (SYS (CHR$(7%)),16%): C$=RIGHT(C$,INSTR(1%,C$," ")) 


Compile this version, and place it under [1,2] with protection code <232>. 


RPG v7.04 


Seq 1* 
RPGXEQ V01-01 
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REPLACEMENT PAGES 


Here are replacement pages for the RPG II Users Guide (DEC-11-OPRGA-A-D) pages 3-27 
and pages E-1 through E-8. Please remove the original pages from your manual and 
replace them with these pages to update the RPG II Installation Procedures. 


RPG II USERS GUIDE DEC-11-OPRGA-A-D Seq 1 
1 of 10 


355 


RPGPCV contains a feature wnich will resequence all source state- 
ment files as an output option, thus assuring the proper handling 
of line numbers by RPGESP. 


3.6.6 Maximum Source Program Size 


The maximuin number of source statements tnat the distrioutea 
RPGESP can nandle is l¥gy. if a file is larger tnan 10¥¥ source 
statements, a “%SS3UFFER NUW FULL" statement occurs, tnen the last 
line read is printed. You can then abort tne run witn “C or 
truncate the file at tne line printed oy “2. ‘Ine system manager 
can change the maximum numoer of source statements. (1) 


(1) To change the number of statements RPGESP will nandle, edit line 
19468 in RPGESP.BAS: replace all occurrences of 1002% in tnat line 
(shown below) with the desired limit (up to 2906). 


156% OIM Lé(18@00%), N3(19V0%), S%(1000%): PS=1600% 
! CHANGE THIS STATEMENT £0 CHANGE CAPACITY OF BUFFERS 


Then, compile this version of RPGESP, and save tne compiled version 
under [1,2] with protection code <232>. 


CREATING AND EDITING RPG PROGRAMS WITH RPGESP 3-27 


APPENDIX E 


RPG II INSTALLATION 


E.1 INSTALLING RPG II AND ITS UTILITIES 


NOTE 


Before performing this installation be 
sure the RSTS/E error message file is a 
separate file on the system (not part of 
the RSTS CIL). You can use the REFRESH 
option under RSTS/E to effect this. 
Also, the RSTS START.CTL file should in- 
clude a line to RUN SERRMSG each time 
the system starts up. Both of these 
provisions are necessary so that BATCd 
will operate correctly. Refer to the 
RSTS/E System Generation Manual or the 
RSTS/E System Manager's Guide. 


The following procedure installs RPG II and its utilities. After 
this, there is a second procedure described in £E.2, to install 
SORT-11. Both procedures vary slightly depending upon the distribu- 
tion medium. Section E.3 describes the differences - refer to that 
section before starting your installation. 


To install RPG II and its utilities, log in on the system library ac- 
count [1,2] and run the BUILD program by answering its dialogue as 


follows: 
RUN S8UILD 
SYSTEM BUILDER 
SYSTEM BUILD? NO 
AUXILIARY BUILD DEVICE? <device> 
CONTROL FILE IS? RPGGEN.CTL 
where 


<device> can be DTn: for DECtape 
MTn: for Magtape 
DKn: for DECpack 

[account]S5Y : for Flexible Diskettes 


E-1 
(Changes June 1976) 
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The installation proceeds on its own from this point and concludes by 


executing a demonstration program. Completion of the entire procedure 
is indicated by the message: 


BUILD COMPLETE 


READY 


NOTE 


It is recommended that a hard copy ter- 
Minal be used during the installation 
procedure, and that the accompanying 
printout be retained. 


E.2 INSTALLATION OF SORT-11 


To install SORT-11, use the LNGBLD program (supplied by the procedure 
in E.1). Its dialogue is as follows: 


RUN SLNGBLD 

LNGBLD V®@6A-@7 BUILD AN AUXILIARY LANGUAGE 

WHAT LANGUAGE IS TO BE BUILT? SORTLI1 

FROM WHAT DEVICE(S) WILL THE FILES COME? <device> 


where 


<device> is either DTn: for DECtape 
[189,199]MTn: for Magnetic tape 
[100,19@]DKn: for DECpack 
[account]SY : for Flexiole Diskettes 


LNGBLD will retrieve the SORT-11 files if necessary and will run the 
SRTBLD program. 


SRTBLO indicates the parameters that build the standard SORT-1ll task 
and asks if you want to make any changes in these parameters: 


DEFAULTS FOR THE SORT11 BUILD ARE: 


NAME soORT11 

SCRATCH PAD 13090 (OCTAL) BYTES 
SCRATCH FILES 3 

SAVE MAP? NO 


ANY CHANGES? 


If you answer NO, the building of SORT-11 will proceed immediately. 
Otherwise, for each of the parameters you will be asked if you want to 
change it and, if so, to what. 


E-2 RPG II INSTALLATION 
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CHANGE SCRATCH PAD? YES 
CHANGE IT TO? 


The size of the scratch pad area can be from 4008 to 
bytes. 


CHANGE SCRATCH FILES? YES 


CNANGE Ll LOS 
The number of scratch files can be from 3 to 9. 


CHANGE NAME? YES 
CHANGE IT TO? name 


Where name is the resulting SORT-ll task. It can 
6-character name. 


SAVE MAP? YES 


77777 


any 


THE MAP WILL BE SAVED AS <name>.MAP ON ACCOUNT [1,2] 


octal 


valid 


Several non-fatal errors will occur during the building procedure. 
These should be ignored. When the SORT-11 task has been installed, 


LNGBLD will inform you that it is finished. 


BUILD COMPLETE 
READY 


E.3 DISTRIBUTION MEDIA 


The following sections provide specific details concerning each of the 


media on which the RPG II software is delivered. 


E.3.1 From DECtape 


First, mount the DECtape labelled DEC-11-LRPSA-A-UC3 on 


an 


available 


DECtape drive. Log in on the system library account [1,2] and run the 


PIP program to retrieve the RPG II compiler task. 
RUN $PIP 
#5RPG.TSK<DIn: RPG. TSK/CO:T 
#72 


READY 


In the device name DTn:, n is the unit number of the DECtape drive. 
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All other RPG II files will be installed using the BUILD program as 
descrioed previously. 


Mount the DECtape labelled DEC-11-LRPSA-A-UC1 on an available drive 
and run the BUILD program, using the device name, 


DTas: 


Where n is the unit number of the DECtape drive. 


E.3.1.1 SORT-11 From DaCtape - The other DECtape supplied, 
DEC-11-LRPSA-A-UC2 contains all of the files necessary to build 
SORT~1l1. Following the instructions given above for LNGBLD, using the 
device name 


DTn: 


SORT-11 will be built as previously indicated. 


E.3.2 From Magtape 


Before attempting to use the RPG II and SORT-1l Magtape, use the DE- 
FAULTS option of CTS-509/E or RSTS/E to insure that the default Mag- 
tape format is in DOS format. (See the RSTS/E System Generation Manu- 
al or the RSTS/E System Manager's Guide.) After establishing DOS for- 
Mat as the default Magtape format, start up the system, log in on the 
system library account [1,2] and mount the RPG II Magtane. 


DEC-11-LRPSA-A-MC9 if Y-track, or 
DEC-11-LRPSA-A-MC7 iff 7-track 


on an available Magtape unit. Run the BUILD program using 
MTn: 
as the device name where n is the unit number of tne magtape drive. 


Everything is as described previously in the BUILD procedure. 


E.3.2.1 SORT-11 From Magtape - To install SORT-11 from the same Mag- 
tape used above, run the LNGBLD program as previously stated but with 
the device designation being 

{180,100] MTn: 


The installation of SORT-11 will proceed as indicated above. 
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E.3.3 From DECpack 
When installing the RPG II software using a DECpack cartridge disk, 
you must first physically mount the DECpack labelled 
DEC-11-LRPSA-A-HC 
on an available drive. 
Using the MOUNT command, logically mount the DECpack by typing: 
MOUNT D&n: RPGLIB 
where n is the unit number of the DECpack drive. 


After doing all of the above, run the BUILD program as previously des- 
cribed, using the device name 


DKn: 
When the BUILD program is completed, the message 


BUILD COMPLETE 
READY 


is given, 


&.3.3.1 SORT-11 From DECpack - You can install SORT-11 by running 
LNGBLD, using the device designation 


{108,183] OKn: 


E.3.4 From Flexible Diskettes 


When installing the RPG II software from flexiole diskettes, you must 
first follow the instructions given in Section 6.2 or Section 7.1 of 
the document, "CTS-50@/E System Generation Using Diskettes," 
DEC-11-OCTGA-A-D, to copy all of the necessary files from the flexible 
diskettes. Mount the first diskette, 


DEC-11-LRPSA-A-YC1 
in an available drive and type: 


RUN DXn: 
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The program on the diskette will respond with: 


CTSDXP V81-88 
# 


after which you type: 
{1,x] SY:=DXn: 
where 


{[1,x] is any unused or empty privileged account (the "1" 

is amust), and n is the unit number in which the disk- 

ette has been mounted. 
Copying of the files will proceed. You will be asked for the next 
diskette when all files from the first diskette have been copied. 
Mount 

DEC-11-LRPSA-A-YC2 
when this occurs and respond with the unit number 
DXn: 

When the message 


TRANSFER OF ALL FILES COMPLETE 


appears, exit the copy program by typing CTRL/C and run the BUILD pro- 
gram as described above. This time the build device will be: 


[1,x] SY: 


the same account used above. 


£.3.4.1 SORT-11 From Flexible Diskettes - When the initial build is 
complete, run the LNGBLD program and use the same device designation 


{l,x] SY: 


for the SORT-11 installation. 


NOTE 


Installing RPG II and SORT-11 uses only 
two of the three diskettes. Section E.4 
tells how to use the third, if needed. 
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E.4 REBUILDING THE COMPILER 


The distributed compiler requires 16K words (32K bytes) of memory, in- 
cluding RTSLIB. It has enough table space for fairly large programs 
without spilling tables onto its overflow disk file (slows compila- 
tion). If the disk file $RPG.OVF is needed, the compiler prints a 
message to that effect and aborts. You can then either create RPG.OVP 
or build a bigger RPG.TSK. Use BASIC-PLUS or RPGFIL to create RPG.OVF 
under [1,2] with protection code <4@>. RPG will extend this file as 
much as it needs (and is able), but a filesize of 408 blocks, cluster- 
size 8, is recommended. To build the compiler, transfer the compiler 
files from the distribution medium to a privileged account on your 
System. For magtape or DECpack, use $PIP with a command string of the 
form 


[1,x]<MTn: [196,208] /co 
or 
[1,*]<Dkn: [198,288] /co 


where [1,x] is a privileged account and n is the unit number of the 
drive on which the distribution is mounted. 


For DECtape, mount DEC-11-LRPSA-A-UC3 and run S$PIP with the command 
string 


[l,x]<DTfn:/Cco:T 
where n is the unit number of the drive on which the tape is mounted. 


For diskette, mount DEC-l11-LRPSA-A-YC3 and proceed as in Section £.3.4 
to transfer the files. 


Now you are ready to build the RPG compiler task. Log in under ac- 
count [1,x], if you are not already under that account. Next, run 
TKB, then transfer the resultant RPG.TSK file to [1,2]: 


RUN $TKB 
TKB>@RPGBLD 
TKB>”Z 


#$RPG.TSK=RPG.TSK/CO 
READY 
NAME "SRPG.TSK"AS"SRPG.TSK<232>" 


To enlarge or shrink the compiler, change the number of bytes allocat- 
ed (in RPGBLD.CMD) for Psect FREE. This allocates the amount of 
in-core table space, and should probably be 29088 (octal bytes) or 
greater. You can also set the page length for the compiler's listing 
by changing the value of PAGLEN in RPGBLD.CHD, 
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READING PACKED & BINARY RECORDS 


If an RPG sequential input file contains records with packed or binary fields, the 
last two bytes will be lost on input (or treated as if they contained blanks). 


To correct this problem, install the following patch by adding these lines to the 
OTS Patch file $RPGPAT.CMD. You should be at patch level V7.04A for the OTS prior 
to making this patch (see previous dispatch articles). 


;V7.04B -- READING PACKED & BINARY RECORDS 
GBLPAT=RPGPAT: $READ+152:425 


RPG V7.04 Seq 2* 
OTS V7.04A l of 1 
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INDEXED PROCESSING WITHIN LIMITS 


PROBLEM: RPG will not process an indexed file within limits. When such process- 
ing is specified, the program executes and terminates with no output. 


DISPOSITION: The following patch corrects this. Add these lines to the OTS patch 
file RPGPAT.CMD on the system account [1,2]. Programs needing this patch should 
be re-taskbuilt (they do not need recompilation). 


;RPG OTS PATCH COMMAND FILE -- RSTS RPG V7.64 


2V7.94A ~~ INDEXED PROCESSING WITHIN LIMITS 
GBLPAT=RPGPAT: R. TRA+16: 405 
GBLPAT=RPGPAT: R. INRA4+10:4737:10080:9 

EXTSCT=RPGPAT: 32 

GBLPAT=RPGPAT:M. PAT+4:16200:104:5369: 2:5610:166082:2:120156 
GBLPAT=RPGPAT: mM. PAT+24:62716:2: 207 


BEG II v7.04 Seq 1* 
1 of 1 


30% 


RSTS/E 

System Installation Notes 
Version VZ6A-G2 
DEC-11-ORINB-D-D 


READER'S COMMENTS 
NOTE: This form is for document comments only. Problems 
with software should be reported on a Software 


Problem Repert (SPR) form (see the HOW TO OBTAIN 
SOFTWARE INFORMATION page). 


Did you find errors in this manual? If so, specify by page. 


Did you find this manual understandable, usable, and well-organized? 
Please make suggestions for improvement. 


© 

A= 

re 

<= 

[= 

1? Bi Toc s 
\© 

ro) 

=) Is there sufficient documentation on associated system programs 

: required for use of the software described in this manual? If not, 
8 what material is missing and where should it be placed? 

a 


Please indicate the type of user/reader that you most nearly represent. 


Assembly language programmer 
Higher-level language programmer 
Occasional programmer (experienced) 
User with little programming experience 


Student programmer 


OOOO000 


Non-programmer interested in computer concepts and capabilities 


Name Date 
Organization 
Street 
City State___ Zip Code 
or 
Country 


If you do not require a written reply, please check here. C) 
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